home *** CD-ROM | disk | FTP | other *** search
/ The World's Largest Collection of Windows Software / The World's Largest Collection of Windows Software - Disc 1.iso / connect / _j2 / wvnsc926 / rcs / wvart.c < prev    next >
C/C++ Source or Header  |  1994-09-21  |  77KB  |  2,975 lines
  1. head    1.33;
  2. access;
  3. symbols
  4.     V80:1.8
  5.     V76d:1.1;
  6. locks; strict;
  7. comment    @ * @;
  8.  
  9.  
  10. 1.33
  11. date    94.09.22.00.09.56;    author jcooper;    state Exp;
  12. branches;
  13. next    1.32;
  14.  
  15. 1.32
  16. date    94.09.18.22.48.51;    author jcooper;    state Exp;
  17. branches;
  18. next    1.31;
  19.  
  20. 1.31
  21. date    94.09.16.00.53.16;    author jcooper;    state Exp;
  22. branches;
  23. next    1.30;
  24.  
  25. 1.30
  26. date    94.08.24.17.59.26;    author jcooper;    state Exp;
  27. branches;
  28. next    1.29;
  29.  
  30. 1.29
  31. date    94.08.11.00.18.04;    author jcooper;    state Exp;
  32. branches;
  33. next    1.28;
  34.  
  35. 1.28
  36. date    94.08.03.00.54.10;    author gardnerd;    state Exp;
  37. branches;
  38. next    1.27;
  39.  
  40. 1.27
  41. date    94.07.27.21.14.38;    author gardnerd;    state Exp;
  42. branches;
  43. next    1.26;
  44.  
  45. 1.26
  46. date    94.07.12.19.16.13;    author rushing;    state Exp;
  47. branches;
  48. next    1.25;
  49.  
  50. 1.25
  51. date    94.07.01.03.45.53;    author dumoulin;    state Exp;
  52. branches;
  53. next    1.24;
  54.  
  55. 1.24
  56. date    94.06.30.21.30.22;    author gardnerd;    state Exp;
  57. branches;
  58. next    1.23;
  59.  
  60. 1.23
  61. date    94.06.23.23.07.13;    author dumoulin;    state Exp;
  62. branches;
  63. next    1.22;
  64.  
  65. 1.22
  66. date    94.06.01.19.01.51;    author gardnerd;    state Exp;
  67. branches;
  68. next    1.21;
  69.  
  70. 1.21
  71. date    94.06.01.18.50.49;    author rushing;    state Exp;
  72. branches;
  73. next    1.20;
  74.  
  75. 1.20
  76. date    94.05.27.01.29.29;    author rushing;    state Exp;
  77. branches;
  78. next    1.19;
  79.  
  80. 1.19
  81. date    94.05.23.18.36.00;    author jcooper;    state Exp;
  82. branches;
  83. next    1.18;
  84.  
  85. 1.18
  86. date    94.02.24.21.26.54;    author jcoop;    state Exp;
  87. branches;
  88. next    1.17;
  89.  
  90. 1.17
  91. date    94.01.24.17.41.01;    author jcoop;    state Exp;
  92. branches;
  93. next    1.16;
  94.  
  95. 1.16
  96. date    94.01.16.12.23.43;    author jcoop;    state Exp;
  97. branches;
  98. next    1.15;
  99.  
  100. 1.15
  101. date    93.12.08.01.28.38;    author rushing;    state Exp;
  102. branches;
  103. next    1.14;
  104.  
  105. 1.14
  106. date    93.08.25.18.54.36;    author mbretherton;    state Exp;
  107. branches;
  108. next    1.13;
  109.  
  110. 1.13
  111. date    93.08.05.20.06.07;    author jcoop;    state Exp;
  112. branches;
  113. next    1.12;
  114.  
  115. 1.12
  116. date    93.07.06.21.09.50;    author cnolan;    state Exp;
  117. branches;
  118. next    1.11;
  119.  
  120. 1.11
  121. date    93.06.26.00.53.33;    author rushing;    state Exp;
  122. branches;
  123. next    1.10;
  124.  
  125. 1.10
  126. date    93.06.26.00.18.46;    author rushing;    state Exp;
  127. branches;
  128. next    1.9;
  129.  
  130. 1.9
  131. date    93.06.22.16.45.00;    author bretherton;    state Exp;
  132. branches;
  133. next    1.8;
  134.  
  135. 1.8
  136. date    93.06.11.00.11.26;    author rushing;    state Exp;
  137. branches;
  138. next    1.7;
  139.  
  140. 1.7
  141. date    93.05.29.03.32.30;    author rushing;    state Exp;
  142. branches;
  143. next    1.6;
  144.  
  145. 1.6
  146. date    93.05.28.18.23.40;    author rushing;    state Exp;
  147. branches;
  148. next    1.5;
  149.  
  150. 1.5
  151. date    93.05.24.23.28.24;    author rushing;    state Exp;
  152. branches;
  153. next    1.4;
  154.  
  155. 1.4
  156. date    93.05.18.22.11.40;    author rushing;    state Exp;
  157. branches;
  158. next    1.3;
  159.  
  160. 1.3
  161. date    93.05.06.19.43.41;    author rushing;    state Exp;
  162. branches;
  163. next    1.2;
  164.  
  165. 1.2
  166. date    93.03.30.20.08.25;    author rushing;    state Exp;
  167. branches;
  168. next    1.1;
  169.  
  170. 1.1
  171. date    93.02.16.20.53.50;    author rushing;    state Exp;
  172. branches;
  173. next    ;
  174.  
  175.  
  176. desc
  177. @winvn version 0.76 placed into RCS
  178. @
  179.  
  180.  
  181. 1.33
  182. log
  183. @Check if text is selected before allowing RMB click to copy
  184. @
  185. text
  186. @/*
  187.  *
  188.  * $Id: wvart.c 1.33 1994/09/19 16:06:27 jcooper Exp $
  189.  * $Log: wvart.c $
  190.  * Revision 1.33  1994/09/19  16:06:27  jcooper
  191.  * Check if text is selected before allowing RMB click to copy
  192.  * 
  193.  * Revision 1.32  1994/09/18  22:48:51  jcooper
  194.  * support for cascading windows
  195.  * 
  196.  * Revision 1.31  1994/09/16  00:53:16  jcooper
  197.  * massive cleanup for 92.6
  198.  * 
  199.  * Revision 1.30  1994/08/24  17:59:26  jcooper
  200.  * misc encoding/decoding changes
  201.  *
  202.  * Revision 1.29  1994/08/11  00:18:04  jcooper
  203.  * added support for article retreive complete message
  204.  *
  205.  * Revision 1.28  1994/08/03  00:54:10  gardnerd
  206.  * Fixed bug with cut to clipboard at 1st and last line of text
  207.  *
  208.  * Revision 1.27  1994/07/27  21:14:38  gardnerd
  209.  * copy to clipboard
  210.  *
  211.  * Revision 1.26  1994/07/12  19:16:13  rushing
  212.  * missing curlies in CloseArtWnd()
  213.  *
  214.  * Revision 1.25  1994/07/01  03:45:53  dumoulin
  215.  * Added the Find Next Unseen and concept of SPACE as a "power key"
  216.  *
  217.  * Revision 1.24  1994/06/30  21:30:22  gardnerd
  218.  * Allow scrolling by pixels instead of characters
  219.  *
  220.  * Revision 1.23  1994/06/23  23:07:13  dumoulin
  221.  * added menu item for Printer Setup
  222.  *
  223.  * Revision 1.22  1994/06/01  19:01:51  gardnerd
  224.  * horizontal scrolling support
  225.  *
  226.  * Revision 1.21  1994/06/01  18:50:49  rushing
  227.  * more f3 bugs
  228.  *
  229.  * Revision 1.20  1994/05/27  01:29:29  rushing
  230.  * unnecessary winundoc.h
  231.  *
  232.  * Revision 1.19  1994/05/23  18:36:00  jcooper
  233.  * new attach code, session [dis]connect
  234.  *
  235.  * Revision 1.18  1994/02/24  21:26:54  jcoop
  236.  * jcoop changes
  237.  *
  238.  * Revision 1.17  1994/01/24  17:41:01  jcoop
  239.  * 90.2 changes
  240.  *
  241.  * Revision 1.16  1994/01/16  12:23:43  jcoop
  242.  * New font/color painting.  no longer use view_art_by_id
  243.  *
  244.  * Revision 1.15  1993/12/08  01:28:38  rushing
  245.  * new version box and cr lf consistency
  246.  * 
  247.  * Revision 1.14  1993/08/25  18:54:36  mbretherton
  248.  * MRB merge, mail & post logging
  249.  *
  250.  *
  251.  * Revision 1.1x  1993/07/21 MBretherton
  252.  *                remove vRef from MRROpenFile (Mac Stuff)
  253.  *
  254.  * Revision 1.13  1993/08/05  20:06:07  jcoop
  255.  * save multiple articles changes by jcoop@@oakb2s01.apl.com (John S Cooper)
  256.  *
  257.  * Revision 1.12  1993/07/06  21:09:50  cnolan
  258.  * win32 support
  259.  *
  260.  * Revision 1.11  1993/06/26  00:53:33  rushing
  261.  * warnings
  262.  *
  263.  * Revision 1.10  1993/06/26  00:18:46  rushing
  264.  * warnings
  265.  *
  266.  * Revision 1.9  1993/06/22  16:45:00  bretherton
  267.  * *** empty log message ***
  268.  *
  269.  * Revision 1.xx M Bretherton  Fix
  270.  *               Mail != Forward in terms of underlying mail support  
  271.  * Revision 1.8  1993/06/11  00:11:26  rushing
  272.  * second merge from Matt Bretherton sources
  273.  *
  274.  * Revision 1.7  1993/05/29  03:32:30  rushing
  275.  * threading support
  276.  *
  277.  * Revision 1.6  1993/05/28  18:23:40  rushing
  278.  * fixed far/huge problem in find_art_by_subject
  279.  *
  280.  * Revision 1.5  1993/05/24  23:28:24  rushing
  281.  * header formatting (MRB)
  282.  *
  283.  *
  284.  * Revision 1.4  1993/05/18  22:11:40  rushing
  285.  * smtp support
  286.  *
  287.  * Revision 1.3  1993/05/06  19:43:41  rushing
  288.  * added Re: fix from MB
  289.  *
  290.  * Revision 1.2  1993/03/30  20:08:25  rushing
  291.  * MAPI
  292.  *
  293.  * Revision 1.1  1993/02/16  20:53:50  rushing
  294.  * Initial revision
  295.  *
  296.  *
  297.  */
  298.  
  299. /*---  wvart.c ------------------------------------------- */
  300. /*  This file contains the window procedure for the Article Viewing window
  301.  *  for WinVn.
  302.  */
  303.  
  304. #include <windows.h>
  305. #include <windowsx.h>
  306. #include "wvglob.h"
  307. #include "winvn.h"
  308. #pragma hdrstop
  309. #include <ctype.h>
  310.  
  311. int cursor_to_char_number (int X, int Y,TypDoc *DocPtr,TypBlock far **BlockPtr,TypLine far **LinePtr);
  312. void CloseArtWnd(HWND hWnd, TypDoc *ThisDoc);
  313. void UpdateHighlightedText(TypDoc far *DocPtr, TextSelect far *PreviousPos);
  314. void HighlightText(TypDoc far *DocPtrs);
  315. void CopyTextToClipBoard(TypDoc FAR *DocPtr);
  316. void SetArticleMenus (HWND hWnd, int enable);
  317.   
  318. /************** find_article_geader_subject *************
  319.  *
  320.  *   Amended to ignore Re: in either heading line as part of match
  321.  *   criteria
  322.  *
  323.  *  Note the duplication of Knowledge of the rules of subject header
  324.  *  format with wvheader : GetArticleSubject
  325.  *
  326.  *  Ideally some object containing all knowledge of rules of format
  327.  *  would be a more elegant implementation
  328.  *  Also note heading changes with each find next of same heading
  329.  *  request. Ideally want to maintain first heading in series
  330.  *  allowing a more liberal interpreation of 'same' in same heading
  331.  *
  332.  *                       Matthew Bretherton 2nd March 1993
  333.  *
  334.  ********************************************************/
  335.  
  336. long find_article_by_subject (header_p headers,
  337.                   long artindex,
  338.                   long num_headers)
  339. {
  340.   char far *nextsub ;
  341.   char far *thissub;
  342.  
  343.   thissub = (header_elt(headers,artindex++))->subject;
  344.   if (CompareStringNoCase (thissub, "Re:", 3) == 0) thissub=thissub + 4;
  345.  
  346.   if (artindex >= num_headers) return (-1);
  347.  
  348.   do {
  349.     nextsub = (header_elt(headers,artindex))->subject ;
  350.     if (CompareStringNoCase (nextsub, "Re:", 3) == 0) nextsub=nextsub + 4;
  351.     if (lstrcmpi (nextsub, thissub) == 0)
  352.       return (artindex);        /* return the index */
  353.   } while (artindex++ < num_headers);
  354.  
  355.   return (-1);                  /* not found */
  356. }
  357.  
  358.  
  359. /****************************************************************************
  360.  
  361.     FUNCTION: WinVnArtWndProc(HWND, unsigned, WORD, LONG)
  362.  
  363.     PURPOSE:  Processes messages
  364.  
  365. ****************************************************************************/
  366.  
  367. long WINAPI WinVnArtWndProc (hWnd, message, wParam, lParam)
  368.      HWND hWnd;
  369.      unsigned message;
  370.      WPARAM wParam;
  371.      LPARAM lParam;
  372. {
  373.   PAINTSTRUCT ps;               /* paint structure          */
  374.  
  375.   HDC hDC;                      /* handle to display context */
  376.   RECT myRect;                  /* selection rectangle      */
  377.   TypDoc *ThisDoc;
  378.   TypGroup far *GroupDoc;
  379.   int ih, j;
  380.   int found, X, Y, charnum;
  381.   int CtrlState;
  382.   TypLine far *LinePtr;
  383.   TypBlock far *BlockPtr;
  384.   HANDLE hBlock;
  385.   char mybuf[MAXINTERNALLINE];
  386.   unsigned int Offset;
  387.   char far *textptr;
  388.   int textlen;
  389.   BOOL continueFind;
  390.   TypLineID MyLineID,artindex;
  391.   HANDLE header_handle;
  392.   HANDLE thread_handle;
  393.   header_p headers;
  394.   header_p header;
  395.   long header_num;
  396.      
  397.   for (ih = 0, found = FALSE; !found && ih < MAXARTICLEWNDS; ih++)
  398.     {
  399.       if (ArticleDocs[ih].hDocWnd == hWnd)
  400.     {
  401.       found = TRUE;
  402.       ThisDoc = &(ArticleDocs[ih]);
  403.     }
  404.     }
  405.  
  406.   if (!found)
  407.     {
  408.       ThisDoc = CommDoc;
  409.     }
  410.  
  411.  
  412.   switch (message)
  413.     {
  414.  
  415.     case WM_CREATE:
  416.       NumArticleWnds++;
  417.       SetArticleMenus(hWnd, DISABLE);
  418.       break;
  419.       
  420.     case WM_ACTIVATE:
  421.     case WM_SETFOCUS:
  422.       if (wParam)
  423.     {
  424.       ActiveArticleDoc = ThisDoc;
  425.     }
  426.       /* fall through */
  427.     case WM_SYSCOMMAND:
  428.       return (DefWindowProc (hWnd, message, wParam, lParam));
  429.  
  430.     case WM_SIZE:
  431.       GetClientRect (hWnd, &myRect);
  432.       ThisDoc->ScXWidth = myRect.right;
  433.       ThisDoc->ScYHeight = myRect.bottom;
  434.       ThisDoc->ScYLines = (myRect.bottom - myRect.top - ArtTopSpace) / ArtLineHeight;
  435.       ThisDoc->ScXChars = (myRect.right - myRect.left - ArtSideSpace) / ArtCharWidth;
  436.       break;
  437.  
  438.     case WM_CLOSE:
  439.       ThisDoc->TextSelected = FALSE;
  440.       CloseArtWnd(hWnd, ThisDoc);
  441.       break;
  442.       
  443.     case WM_DESTROY:
  444.       NumArticleWnds--;
  445.       ThisDoc->TextSelected = FALSE;
  446.       ThisDoc->InUse = FALSE;
  447.       ThisDoc->LongestLine = 0;
  448.       ThisDoc->ScXOffset = 0;
  449.       if (ThisDoc == CommDoc)
  450.     {
  451.       CommBusy = FALSE;
  452.       CommDoc = (TypDoc *) NULL;
  453.     }
  454.       /* Clear the pointer in the line for this article in the   */
  455.       /* group  document.  This pointer currently points       */
  456.       /* to the current document, which we are wiping out      */
  457.       /* with the destruction of this window.                  */
  458.  
  459.       if (ThisDoc->ParentDoc)
  460.     {
  461.     LockLine (ThisDoc->ParentDoc->hParentBlock,
  462.           ThisDoc->ParentDoc->ParentOffset,
  463.           ThisDoc->ParentDoc->ParentLineID,
  464.           &BlockPtr, &LinePtr);
  465.  
  466.     GroupDoc = (TypGroup far *) ((char far *) LinePtr + sizeof (TypLine));
  467.  
  468.     header_handle = GroupDoc->header_handle;
  469.     thread_handle = GroupDoc->thread_handle;        
  470.     headers = lock_headers (header_handle,thread_handle);
  471.  
  472.     (header_elt(headers,ThisDoc->LastSeenLineID))->ArtDoc = (TypDoc *) NULL;
  473.     UnlockLine (BlockPtr, LinePtr, &hBlock, &Offset, &MyLineID);
  474.     unlock_headers (header_handle, thread_handle);
  475.     }
  476.       /* Clear document                                        */
  477.       FreeDoc (ThisDoc);
  478.  
  479.       /* If there's another article window, make it the active   */
  480.       /* artcile window so we don't create a new one if the      */
  481.       /* New Article flag is FALSE.                              */
  482.  
  483.       for (j = MAXARTICLEWNDS - 1; j >= 0; j--)
  484.     {
  485.       if (ArticleDocs[j].InUse)
  486.         {
  487.           ActiveArticleDoc = &(ArticleDocs[j]);
  488.           break;
  489.         }
  490.     }
  491.       break;
  492.  
  493.     case WM_KEYDOWN:
  494.       /* See if this key should be mapped to a scrolling event
  495.        * for which we have programmed the mouse.  If so,
  496.        * construct the appropriate mouse call and call the mouse code.
  497.        */
  498.  
  499.       if (wParam == VK_F6)
  500.     {
  501.       NextWindow (ThisDoc);
  502.     }
  503.       else 
  504.         if (wParam == VK_SPACE)
  505.          {   
  506.            if (ThisDoc->ActiveLines > (ThisDoc->ScYLines + ThisDoc->TopLineOrd))
  507.             {
  508.              SendMessage (hWnd,(UINT) WM_KEYDOWN, (WPARAM) VK_NEXT, (LPARAM) 0L);
  509.              break; 
  510.             }
  511.            else 
  512.              { 
  513.               if (!(CommBusy && ThisDoc == CommDoc))
  514.                 SendMessage (hWnd,(UINT) WM_COMMAND, (WPARAM) IDM_FIND_NEXT_UNSEEN, (LPARAM) 0L); 
  515.               break;
  516.               }
  517.          }
  518.       else
  519.     {
  520.       CtrlState = GetKeyState (VK_CONTROL) < 0;
  521.       for (j = 0; j < NUMKEYS; j++)
  522.         {
  523.           if (wParam == key2scroll[j].wVirtKey &&
  524.           CtrlState == key2scroll[j].CtlState)
  525.         {
  526.           SendMessage (hWnd, key2scroll[j].iMessage,
  527.                    key2scroll[j].wRequest, 0L);
  528.           break;
  529.         }
  530.         }
  531.     }
  532.  
  533.       break;    
  534.       
  535.      case WM_RBUTTONDOWN:
  536.        if (ThisDoc->TextSelected) {
  537.           CopyTextToClipBoard(ThisDoc);
  538.           SendMessage (hWnd, (UINT) WM_COMMAND, (WPARAM) IDM_DESELECT_ALL, (LPARAM) 0L);  //Un-mark selection
  539.        }
  540.        break;
  541.  
  542.  
  543.     case WM_LBUTTONDOWN: 
  544.     {
  545.       int TempX, TempY;
  546.                  
  547.       if (CommBusy && CommDoc == ThisDoc)
  548.       {
  549.         MessageBox (hWnd, "Please wait until article retrieval is complete before selecting text.", "Please Wait", MB_OK);
  550.       }
  551.       else    
  552.       {
  553.         DragMouseAction = DRAG_SELECT; 
  554.         ThisDoc->TextSelected = FALSE; 
  555.         EnableMenuItem(GetMenu(hWnd),IDM_COPY,MF_GRAYED) ;
  556.         EnableMenuItem(GetMenu(hWnd),IDM_DESELECT_ALL,MF_GRAYED) ;
  557.         X = LOWORD (lParam);
  558.         Y = HIWORD (lParam);
  559.   
  560.         if (X < ArtSideSpace)
  561.         {
  562.           TempX = ArtSideSpace;
  563.         }
  564.         else
  565.         {
  566.           TempX = min(X, (int)ThisDoc->ScXWidth);
  567.         }
  568.   
  569.         if (Y < ArtTopSpace)
  570.         {
  571.           TempY = ArtTopSpace;
  572.         }
  573.         else
  574.         { 
  575.           TempY = min(Y, (int)(ArtTopSpace + (ThisDoc->ScYLines-1) * ArtLineHeight));
  576.           if(TempY > (int)(ArtTopSpace + ((int)ThisDoc->TotalLines - (int)ThisDoc->TopLineOrd - 1) * ArtLineHeight))
  577.           {
  578.             TempY = (int)ArtTopSpace + ((int)ThisDoc->TotalLines - (int)ThisDoc->TopLineOrd - 1) * (int)ArtLineHeight;
  579.           }  
  580.         }
  581.   
  582.         ThisDoc->BeginSelect.LineNum = (TempY - ArtTopSpace) / ArtLineHeight + ThisDoc->TopLineOrd;
  583.         ThisDoc->BeginSelect.CharNum = cursor_to_char_number (TempX,TempY,ThisDoc,&BlockPtr,&LinePtr);
  584.         ThisDoc->EndSelect.LineNum = -1; 
  585.         SetRect(&myRect, 0, 0, ThisDoc->ScXWidth, ThisDoc->ScYHeight);   
  586.         InvalidateRect(ThisDoc->hDocWnd, &myRect, FALSE);
  587.         SetCursor(LoadCursor(NULL, IDC_IBEAM));
  588.         SetCapture(hWnd);
  589.       }
  590.     }    
  591.     break;  
  592.               
  593.     case WM_MOUSEMOVE:
  594.     {
  595.       int X, Y, TempX, TempY;
  596.       TextSelect Previous;
  597.       int ScMin, ScMax;
  598.       POINT CursorLocation;
  599.       MSG Message;
  600.       BOOL ScrollText = FALSE;
  601.       void CheckForUpdate();      
  602.                  
  603.       if(DragMouseAction == DRAG_SELECT)
  604.       {  
  605.         ThisDoc->TextSelected = TRUE;
  606.         EnableMenuItem(GetMenu(hWnd),IDM_COPY,MF_ENABLED) ;
  607.         EnableMenuItem(GetMenu(hWnd),IDM_DESELECT_ALL,MF_ENABLED) ;
  608.         X = LOWORD (lParam);
  609.         Y = HIWORD (lParam);
  610.         
  611.         // Check to see if text selection needs to scroll left.
  612.         if((X < 0) && (ThisDoc->ScXOffset > 0))
  613.         { 
  614.           ScrollText = TRUE;
  615.  
  616.           do // keep scrolling until the mouse moves.
  617.           { 
  618.             TempX = ArtSideSpace;
  619.             if (Y < ArtTopSpace)
  620.             {
  621.               TempY = ArtTopSpace;
  622.             }
  623.             else
  624.             {
  625.               TempY = min(Y, (int)(ArtTopSpace + (ThisDoc->ScYLines-1) * ArtLineHeight));
  626.               if(TempY > (int)(ArtTopSpace + ((int)ThisDoc->TotalLines - (int)ThisDoc->TopLineOrd - 1) * ArtLineHeight))
  627.               {
  628.                 TempY = (int)ArtTopSpace + ((int)ThisDoc->TotalLines - (int)ThisDoc->TopLineOrd - 1) * (int)ArtLineHeight;
  629.               }  
  630.             }
  631.             
  632.             Previous.LineNum = ThisDoc->EndSelect.LineNum;
  633.             Previous.CharNum = ThisDoc->EndSelect.CharNum;
  634.             SendMessage(ThisDoc->hDocWnd, WM_HSCROLL, SB_LINEUP, 0);
  635.             ThisDoc->EndSelect.LineNum = (TempY - (int)ArtTopSpace) / (int)ArtLineHeight + ThisDoc->TopLineOrd; 
  636.             ThisDoc->EndSelect.CharNum = cursor_to_char_number (TempX,TempY,ThisDoc,&BlockPtr,&LinePtr);
  637.             UpdateHighlightedText(ThisDoc, &Previous);                       
  638.             SendMessage(ThisDoc->hDocWnd, WM_PAINT, 0, 0);
  639.             if(PeekMessage(&Message, ThisDoc->hDocWnd, WM_LBUTTONUP, WM_LBUTTONUP, PM_NOREMOVE))
  640.               break;
  641.             GetCursorPos(&CursorLocation);
  642.             ScreenToClient(ThisDoc->hDocWnd, &CursorLocation);
  643.           }
  644.           while((X == CursorLocation.x) && (Y == CursorLocation.y) &&
  645.                 (ThisDoc->ScXOffset > 0));
  646.         }
  647.         
  648.         GetScrollRange(ThisDoc->hDocWnd, SB_HORZ, &ScMin, &ScMax);
  649.         // Check to see if text selection needs to scroll right.
  650.         if((X > (int)ThisDoc->ScXWidth) && ((int)ThisDoc->ScXOffset < ScMax))
  651.         { 
  652.           ScrollText = TRUE;
  653.             
  654.           do // keep scrolling until the mouse moves.
  655.           { 
  656.             TempX = ThisDoc->ScXWidth;
  657.             if (Y < ArtTopSpace)
  658.             {
  659.               TempY = ArtTopSpace;
  660.             }
  661.             else
  662.             {
  663.               TempY = min(Y, (int)(ArtTopSpace + (ThisDoc->ScYLines-1) * ArtLineHeight));
  664.               if(TempY > (int)(ArtTopSpace + ((int)ThisDoc->TotalLines - (int)ThisDoc->TopLineOrd - 1) * ArtLineHeight))
  665.               {
  666.                 TempY = (int)ArtTopSpace + ((int)ThisDoc->TotalLines - (int)ThisDoc->TopLineOrd - 1) * (int)ArtLineHeight;
  667.               }  
  668.             }
  669.  
  670.             Previous.LineNum = ThisDoc->EndSelect.LineNum;
  671.             Previous.CharNum = ThisDoc->EndSelect.CharNum;
  672.             SendMessage(ThisDoc->hDocWnd, WM_HSCROLL, SB_LINEDOWN, 0);
  673.             ThisDoc->EndSelect.LineNum = (TempY - (int)ArtTopSpace) / (int)ArtLineHeight + ThisDoc->TopLineOrd; 
  674.             ThisDoc->EndSelect.CharNum = cursor_to_char_number (TempX,TempY,ThisDoc,&BlockPtr,&LinePtr);
  675.                                     
  676.             UpdateHighlightedText(ThisDoc, &Previous); 
  677.             SendMessage(ThisDoc->hDocWnd, WM_PAINT, 0, 0);
  678.             if(PeekMessage(&Message, ThisDoc->hDocWnd, WM_LBUTTONUP, WM_LBUTTONUP, PM_NOREMOVE))
  679.               break;
  680.             GetCursorPos(&CursorLocation);
  681.             ScreenToClient(ThisDoc->hDocWnd, &CursorLocation);
  682.             }
  683.             while((X == CursorLocation.x) && (Y == CursorLocation.y)
  684.                && ((int)ThisDoc->ScXOffset < ScMax));
  685.         }     
  686.  
  687.         // Check to see if text selection needs to scroll up.
  688.         if((Y < 0) && (ThisDoc->TopLineOrd > 0))
  689.         { 
  690.           ScrollText = TRUE;
  691.           
  692.           do // keep scrolling until the mouse moves.
  693.           { 
  694.             TempY = ArtTopSpace;
  695.             if (X < ArtSideSpace)
  696.             {
  697.               TempX = ArtSideSpace;
  698.             }
  699.             else
  700.             {
  701.               TempX = min(X, (int)ThisDoc->ScXWidth);
  702.             }
  703.                           
  704.             Previous.LineNum = ThisDoc->EndSelect.LineNum;
  705.             Previous.CharNum = ThisDoc->EndSelect.CharNum;
  706.             SendMessage(ThisDoc->hDocWnd, WM_VSCROLL, SB_LINEUP, 0);
  707.             ThisDoc->EndSelect.LineNum = (TempY - (int)ArtTopSpace) / (int)ArtLineHeight + ThisDoc->TopLineOrd; 
  708.             ThisDoc->EndSelect.CharNum = cursor_to_char_number (TempX,TempY,ThisDoc,&BlockPtr,&LinePtr);
  709.             UpdateHighlightedText(ThisDoc, &Previous);
  710.             SendMessage(ThisDoc->hDocWnd, WM_PAINT, 0, 0);
  711.             if(PeekMessage(&Message, ThisDoc->hDocWnd, WM_LBUTTONUP, WM_LBUTTONUP, PM_NOREMOVE))
  712.               break;
  713.             GetCursorPos(&CursorLocation);
  714.             ScreenToClient(ThisDoc->hDocWnd, &CursorLocation); 
  715.           }
  716.           while((X == CursorLocation.x) && (Y == CursorLocation.y)
  717.              && (ThisDoc->TopLineOrd > 0));
  718.         }
  719.         
  720.         GetScrollRange(ThisDoc->hDocWnd, SB_VERT, &ScMin, &ScMax);
  721.         // Check to see if text selection needs to scroll down.
  722.         if((Y > (int)ThisDoc->ScYHeight) && 
  723.           ((int)ThisDoc->TopLineOrd < ScMax))
  724.         {               
  725.           ScrollText = TRUE;
  726.               
  727.           do // keep scrolling until the mouse moves.
  728.           { 
  729.             TempY = ArtTopSpace + (ThisDoc->ScYLines-1) * ArtLineHeight;
  730.             if(TempY > (int)(ArtTopSpace + ((int)ThisDoc->TotalLines - (int)ThisDoc->TopLineOrd - 1) * ArtLineHeight))
  731.             {
  732.               TempY = (int)ArtTopSpace + ((int)ThisDoc->TotalLines - (int)ThisDoc->TopLineOrd - 1) * (int)ArtLineHeight;
  733.             }  
  734.             
  735.             if (X < ArtSideSpace)
  736.             {
  737.               TempX = ArtSideSpace;
  738.             }
  739.             else
  740.             {
  741.               TempX = min(X, (int)ThisDoc->ScXWidth);
  742.             }
  743.                           
  744.             Previous.LineNum = ThisDoc->EndSelect.LineNum;
  745.             Previous.CharNum = ThisDoc->EndSelect.CharNum;
  746.             SendMessage(ThisDoc->hDocWnd, WM_VSCROLL, SB_LINEDOWN, 0);
  747.             ThisDoc->EndSelect.LineNum = (TempY - (int)ArtTopSpace) / (int)ArtLineHeight + ThisDoc->TopLineOrd; 
  748.             ThisDoc->EndSelect.CharNum = cursor_to_char_number (TempX,TempY,ThisDoc,&BlockPtr,&LinePtr);
  749.             UpdateHighlightedText(ThisDoc, &Previous);
  750.             SendMessage(ThisDoc->hDocWnd, WM_PAINT, 0, 0); 
  751.             if(PeekMessage(&Message, ThisDoc->hDocWnd, WM_LBUTTONUP, WM_LBUTTONUP, PM_NOREMOVE))
  752.               break;
  753.             GetCursorPos(&CursorLocation);
  754.             ScreenToClient(ThisDoc->hDocWnd, &CursorLocation);
  755.           }
  756.           while((X == CursorLocation.x) && (Y == CursorLocation.y)
  757.              && ((int)ThisDoc->TopLineOrd < ScMax));
  758.         }     
  759.         
  760.         if (!ScrollText)
  761.         { 
  762.           if (X < ArtSideSpace)
  763.           {
  764.             TempX = ArtSideSpace;
  765.           }
  766.           else
  767.           {
  768.             TempX = min(X, (int)ThisDoc->ScXWidth);
  769.           }
  770.           if (Y < ArtTopSpace)
  771.           {
  772.             TempY = ArtTopSpace;
  773.           }
  774.           else
  775.           {
  776.             TempY = min(Y, (int)(ArtTopSpace + (ThisDoc->ScYLines-1) * ArtLineHeight));
  777.             if(TempY > (int)(ArtTopSpace + ((int)ThisDoc->TotalLines - (int)ThisDoc->TopLineOrd - 1) * ArtLineHeight))
  778.             {
  779.               TempY = (int)ArtTopSpace + ((int)ThisDoc->TotalLines - (int)ThisDoc->TopLineOrd - 1) * (int)ArtLineHeight;
  780.             }  
  781.           }
  782.           
  783.           Previous.LineNum = ThisDoc->EndSelect.LineNum;
  784.           Previous.CharNum = ThisDoc->EndSelect.CharNum;                           
  785.           ThisDoc->EndSelect.LineNum = (TempY - (int)ArtTopSpace) / (int)ArtLineHeight + ThisDoc->TopLineOrd; 
  786.           ThisDoc->EndSelect.CharNum = cursor_to_char_number (TempX, TempY, ThisDoc, &BlockPtr, &LinePtr);
  787.           UpdateHighlightedText(ThisDoc, &Previous);
  788.  
  789.         }
  790.         
  791.         if((ThisDoc->EndSelect.LineNum > ThisDoc->BeginSelect.LineNum) ||
  792.           ((ThisDoc->EndSelect.LineNum == ThisDoc->BeginSelect.LineNum) &&
  793.            (ThisDoc->EndSelect.CharNum >= ThisDoc->BeginSelect.CharNum)))
  794.         {
  795.           if(((Previous.LineNum < ThisDoc->BeginSelect.LineNum) ||
  796.              ((Previous.LineNum == ThisDoc->BeginSelect.LineNum) &&
  797.               (Previous.CharNum <= ThisDoc->BeginSelect.CharNum))))
  798.           {
  799.             InvalidateRect(hWnd, NULL, FALSE);
  800.           } 
  801.         }
  802.         else
  803.         {
  804.           if(((Previous.LineNum > ThisDoc->BeginSelect.LineNum) ||
  805.              ((Previous.LineNum == ThisDoc->BeginSelect.LineNum) &&
  806.               (Previous.CharNum >= ThisDoc->BeginSelect.CharNum))))
  807.           {
  808.             InvalidateRect(hWnd, NULL, FALSE);
  809.           } 
  810.         }       
  811.       }
  812.     }  
  813.     break;  
  814.                     
  815.     case WM_LBUTTONUP:
  816.     {
  817.       int TempX, TempY;
  818.       
  819.       if(DragMouseAction == DRAG_SELECT)
  820.       { 
  821.         DragMouseAction = DRAG_NONE; 
  822.         if(ThisDoc->TextSelected == TRUE)
  823.         {
  824.           X = LOWORD (lParam);
  825.           Y = HIWORD (lParam); 
  826.         
  827.           if (X < ArtSideSpace)
  828.           {
  829.             TempX = ArtSideSpace;
  830.           }
  831.           else
  832.           {
  833.             TempX = min(X, (int)ThisDoc->ScXWidth);
  834.           }
  835.           if (Y < ArtTopSpace)
  836.           {
  837.             TempY = ArtTopSpace;
  838.           }
  839.           else
  840.           {
  841.             TempY = min(Y, (int)(ArtTopSpace + (ThisDoc->ScYLines-1) * ArtLineHeight));
  842.           }
  843.  
  844.           ThisDoc->EndSelect.LineNum = (TempY - (int)ArtTopSpace) / (int)ArtLineHeight + ThisDoc->TopLineOrd; 
  845.           ThisDoc->EndSelect.CharNum = cursor_to_char_number (TempX, TempY, ThisDoc, &BlockPtr, &LinePtr);
  846.           InvalidateRect(ThisDoc->hDocWnd, NULL, FALSE);
  847.        }
  848.         SetCursor(LoadCursor(NULL, IDC_ARROW)); 
  849.         ReleaseCapture();  
  850.       }
  851.     }     
  852.     break;  
  853.        
  854.     case WM_LBUTTONDBLCLK:
  855.       X = LOWORD (lParam);
  856.       Y = HIWORD (lParam);
  857.  
  858.       charnum = cursor_to_char_number (X,Y,ThisDoc,&BlockPtr,&LinePtr);
  859.  
  860.       if (charnum >= 0) {
  861.     textlen = ((TypText far *) ((char far *) LinePtr +
  862.                 sizeof (TypLine)))->NameLen;
  863.  
  864.     textptr = (char far *) ((char far *) LinePtr +
  865.                   sizeof (TypLine) + sizeof (TypText) );
  866.  
  867.     if (textlen)
  868.     {                                       /* find a message-id */
  869.       char far *start, far *end;
  870.  
  871.       for (start = textptr + charnum; start >= textptr; start--) 
  872.         if (*start == '<') break;
  873.  
  874.       for (end = textptr + charnum; end < (textptr + textlen); end++) 
  875.         if (*end == '>') break;
  876.  
  877.       if ((start >= textptr) && (end < (textptr + textlen))) {
  878.         sprintf (str, "%.*Fs", (int) ((long) end - (long) start + 1), start);
  879.         LockLine (ThisDoc->ParentDoc->hParentBlock,
  880.                ThisDoc->ParentDoc->ParentOffset,
  881.                ThisDoc->ParentDoc->ParentLineID,
  882.                &BlockPtr, &LinePtr);
  883.         GroupDoc = (TypGroup far *) ((char far *) LinePtr + sizeof (TypLine));
  884.             ViewArticle (ThisDoc->ParentDoc, ThisDoc->LastSeenLineID, REUSE, SHOW, str);
  885.       }
  886.     }
  887.       }
  888.  
  889.       break;
  890.  
  891.     case WM_VSCROLL:
  892.       ScrollIt (ThisDoc, wParam, lParam);
  893.       break;
  894.       
  895.     case WM_HSCROLL:
  896.              HScrollIt (ThisDoc, wParam, lParam);
  897.              break;
  898.  
  899.     case WM_PAINT:
  900.       {
  901.     HANDLE hBlock;
  902.     unsigned int Offset, MyLen;
  903.     int VertLines, HorzChars;
  904.     int EndofDoc = FALSE;
  905.     int RangeHigh, CurPos;
  906.     int lineNum ;
  907.     char far *textptr;
  908.     TypBlock far *BlockPtr;
  909.     TypLine far *LinePtr;
  910.     int MyColorMask = 1, PrevColorMask = MyColorMask;
  911.     BOOL ROT13Mode = GetArticleRot13Mode(hWnd) ;
  912.     RECT aRect;
  913.     TextSelect FAR *Start, *End;
  914.     SIZE extent;
  915.     HBRUSH hSolidBrush;
  916.         
  917.     hDC = BeginPaint (hWnd, &ps);
  918.     SetBkColor (hDC, ArticleBackgroundColor);
  919.         SetTextColor (hDC, ArticleTextColor);
  920.  
  921.     GetClientRect (hWnd, &myRect);
  922.     VertLines = ThisDoc->ScYLines;
  923.     HorzChars = ThisDoc->ScXChars;
  924.     
  925.     // Prepare to highlight text if it has been selected
  926.     if(ThisDoc->TextSelected)
  927.     {
  928.       // check to see if selection is in a forward direction 
  929.       // (i.e. top-to-bottom or left-to-right
  930.       if((ThisDoc->EndSelect.LineNum > ThisDoc->BeginSelect.LineNum) ||
  931.         ((ThisDoc->EndSelect.LineNum == ThisDoc->BeginSelect.LineNum) &&
  932.          (ThisDoc->EndSelect.CharNum >= ThisDoc->BeginSelect.CharNum)))
  933.       { 
  934.         Start = &ThisDoc->BeginSelect;                                              
  935.         End = &ThisDoc->EndSelect;                       
  936.       }
  937.       else
  938.       {
  939.          Start = &ThisDoc->EndSelect;
  940.          End = &ThisDoc->BeginSelect;  
  941.       }
  942.     }           
  943.     
  944.     LockLine (ThisDoc->hCurTopScBlock, ThisDoc->TopScOffset, ThisDoc->TopScLineID,
  945.           &BlockPtr, &LinePtr);
  946.  
  947.     /* Update the scroll bar thumb position.                 */
  948.  
  949.     CurPos = lineNum = ThisDoc->TopLineOrd;
  950.     if (CurPos < 0)
  951.       CurPos = 0;
  952.     RangeHigh = ThisDoc->TotalLines - VertLines;
  953.     if (RangeHigh < 0)
  954.       RangeHigh = 0;  
  955.     SetScrollRange (hWnd, SB_VERT, 0, RangeHigh, FALSE);
  956.     SetScrollPos (hWnd, SB_VERT, CurPos, TRUE);
  957.                                                                 
  958.     RangeHigh = ThisDoc->LongestLine - ThisDoc->ScXChars; 
  959.     if (RangeHigh < 0) 
  960.     {
  961.       RangeHigh = 0;
  962.       ThisDoc->ScXOffset = 0;
  963.     }
  964.     SetScrollRange (hWnd, SB_HORZ, 0, RangeHigh, FALSE);
  965.     SetScrollPos (hWnd, SB_HORZ, ThisDoc->ScXOffset, TRUE);     
  966.     
  967.     
  968.     /* Now paint this stuff on the screen for debugging. */
  969.  
  970.     X = ArtSideSpace - ThisDoc->ScXOffset * (ArtCharWidth+1);
  971.     Y = ArtTopSpace;
  972.  
  973.     if (LinePtr->length != END_OF_BLOCK)
  974.       do
  975.         {
  976.     //    MyLen = LinePtr->length - sizeof (TypLine) - sizeof (int) - 1;
  977.           MyLen = ((TypText far *) ((char far *) LinePtr +
  978.                     sizeof (TypLine)))->NameLen;
  979.           textptr = (char far *) LinePtr + sizeof (TypLine) + sizeof (TypText);
  980.  
  981.           if  (ROT13Mode && ((unsigned)lineNum > ThisDoc->HeaderLines))
  982.           {  /*  within body of artcile take copy of string to
  983.              avoid changing original data */
  984.          strcpy (mybuf, textptr);
  985.          textptr = mybuf ;
  986.          strROT13(textptr) ;
  987.           }
  988.  
  989.           if (isLineQuotation(textptr))
  990.           {  /* prepare to print a quotation Line */
  991.          SelectObject (hDC, hFontArtQuote);
  992.           } else
  993.           {  /* prepare to print a normal line */
  994.          SelectObject (hDC, hFontArtNormal);
  995.           }
  996.          
  997.           /* Now write out the line. */ 
  998.           /* Check to see the line is to be highlighted */
  999.           if((ThisDoc->TextSelected) && (lineNum >= Start->LineNum) &&
  1000.              (lineNum <= End->LineNum))  
  1001.           {
  1002.             if(MyLen != 0)
  1003.             { 
  1004.               if(Start->LineNum == End->LineNum)
  1005.               { /* Only one line contains highlighted text */
  1006.                 GetTextExtentPoint(hDC, (LPSTR)textptr, Start->CharNum, &extent);
  1007.                 SetRect(&aRect, X, Y, X + extent.cx, Y+ArtLineHeight);
  1008.                 ExtTextOut (hDC, X, Y, ETO_OPAQUE, &aRect, textptr,
  1009.                             Start->CharNum, (LPINT)NULL);  
  1010.                 SetBkColor(hDC, ArticleTextColor);
  1011.                 SetTextColor(hDC, ArticleBackgroundColor);
  1012.                 aRect.left = aRect.right;
  1013.                 GetTextExtentPoint(hDC, (LPSTR)textptr, End->CharNum+1, &extent);
  1014.                 aRect.right = X + extent.cx;
  1015.                 ExtTextOut (hDC, aRect.left, Y, ETO_OPAQUE, &aRect, 
  1016.                             textptr + Start->CharNum, 
  1017.                             End->CharNum - Start->CharNum + 1, (LPINT)NULL);
  1018.                 aRect.left = aRect.right;
  1019.                 GetTextExtentPoint(hDC, (LPSTR) textptr, MyLen, &extent);
  1020.                 aRect.right = X + extent.cx;
  1021.                 SetBkColor(hDC, ArticleBackgroundColor);
  1022.                 SetTextColor(hDC, ArticleTextColor);
  1023.                 ExtTextOut (hDC, aRect.left, Y, ETO_OPAQUE, &aRect, 
  1024.                             textptr + End->CharNum + 1, MyLen - End->CharNum - 1,
  1025.                             (LPINT)NULL);
  1026.                 Y += ArtLineHeight;
  1027.                 lineNum++;
  1028.               }
  1029.               else
  1030.               {
  1031.                 if(lineNum == Start->LineNum)
  1032.                 { /* First line of more than one line to highlight */
  1033.                   GetTextExtentPoint(hDC, (LPSTR)textptr, Start->CharNum, &extent);
  1034.                   SetRect(&aRect, X, Y, X + extent.cx, Y+ArtLineHeight);
  1035.                   ExtTextOut(hDC, X, Y, ETO_OPAQUE, &aRect, textptr,
  1036.                              Start->CharNum, (LPINT)NULL);  
  1037.                   SetBkColor(hDC, ArticleTextColor);
  1038.                   SetTextColor(hDC, ArticleBackgroundColor);
  1039.                   aRect.left = aRect.right;
  1040.                   GetTextExtentPoint(hDC, (LPSTR)textptr, MyLen, &extent);
  1041.                   aRect.right = X + extent.cx;
  1042.                   ExtTextOut(hDC, aRect.left, Y, ETO_OPAQUE, &aRect,
  1043.                              textptr + Start->CharNum, MyLen - Start->CharNum,
  1044.                              (LPINT)NULL);
  1045.                   SetBkColor(hDC, ArticleBackgroundColor);
  1046.                   SetTextColor(hDC, ArticleTextColor);
  1047.                 }
  1048.                 if((lineNum > Start->LineNum) && (lineNum < End->LineNum))
  1049.                 { /* Whole lines to be highlighted */ 
  1050.                   GetTextExtentPoint(hDC, (LPSTR)textptr, MyLen, &extent);
  1051.                   SetRect(&aRect, X, Y, X + extent.cx, Y+ArtLineHeight);
  1052.                   SetBkColor(hDC, ArticleTextColor);
  1053.                   SetTextColor(hDC, ArticleBackgroundColor);
  1054.                   ExtTextOut (hDC, X, Y, ETO_OPAQUE, &aRect, textptr,
  1055.                               MyLen, (LPINT)NULL);                          
  1056.                   SetBkColor(hDC, ArticleBackgroundColor);
  1057.                   SetTextColor(hDC, ArticleTextColor);
  1058.                 }
  1059.                 if(lineNum == End->LineNum)
  1060.                 { /* Last line to be highlighted */ 
  1061.                   SetBkColor(hDC, ArticleTextColor);
  1062.                   SetTextColor(hDC, ArticleBackgroundColor);
  1063.                   GetTextExtentPoint(hDC, (LPSTR)textptr, End->CharNum + 1, &extent);
  1064.                   SetRect(&aRect, X, Y, X + extent.cx, Y+ArtLineHeight);
  1065.                   ExtTextOut(hDC, X, Y, ETO_OPAQUE, &aRect, textptr,
  1066.                              End->CharNum + 1, (LPINT)NULL);  
  1067.                   aRect.left = aRect.right;
  1068.                   GetTextExtentPoint(hDC, (LPSTR)textptr, MyLen, &extent);
  1069.                   aRect.right = X + extent.cx;
  1070.                   SetBkColor(hDC, ArticleBackgroundColor);
  1071.                   SetTextColor(hDC, ArticleTextColor);
  1072.                   ExtTextOut(hDC, aRect.left, Y, ETO_OPAQUE, &aRect,
  1073.                              textptr + End->CharNum + 1, MyLen - End->CharNum - 1,
  1074.                              (LPINT)NULL);
  1075.                 }
  1076.  
  1077.                 Y += ArtLineHeight;
  1078.                 lineNum++;                    
  1079.               
  1080.               }    
  1081.             }
  1082.             else
  1083.             { /* Blank Line -- Rectangle for CR/LF */
  1084.               SetRect(&aRect, X, Y, X+4, Y+ArtLineHeight);
  1085.               hSolidBrush = CreateSolidBrush(ArticleTextColor);
  1086.               FillRect(hDC, &aRect, hSolidBrush); 
  1087.               DeleteObject((HGDIOBJ)hSolidBrush);
  1088.               Y += ArtLineHeight;
  1089.               lineNum++;
  1090.             }  
  1091.           } 
  1092.           else
  1093.           { /* Line is not highlighted */
  1094.             GetTextExtentPoint(hDC, (LPSTR)textptr, MyLen, &extent);
  1095.             SetRect (&aRect, X, Y, X + extent.cx, Y+ArtLineHeight);
  1096.           
  1097.             ExtTextOut (hDC, X, Y, ETO_OPAQUE, &aRect, textptr,
  1098.                         MyLen, (LPINT)NULL);       
  1099.             aRect.left = aRect.right;
  1100.             Y += ArtLineHeight;
  1101.             lineNum++ ; 
  1102.           }
  1103.                                          
  1104.         /* Fill in the space to the right of the end of the line *
  1105.          * with the article background color                     */                                         
  1106.         aRect.left = aRect.right;
  1107.         aRect.right = ThisDoc->ScXWidth;               
  1108.         hSolidBrush = CreateSolidBrush(ArticleBackgroundColor);
  1109.         FillRect(hDC, &aRect, hSolidBrush);
  1110.         DeleteObject((HGDIOBJ)hSolidBrush); 
  1111.           
  1112.         }
  1113.       while (--VertLines > 0 && NextLine (&BlockPtr, &LinePtr));  
  1114.       
  1115.                                                             
  1116.     /* We've reached the end of the data to be displayed     */
  1117.     /* on this window.  If there's more screen real estate   */
  1118.     /* left, just blank it out and blank top space.          */
  1119.     SelectObject (hDC, hArticleBackgroundBrush);
  1120.     PatBlt (hDC, 0, Y, myRect.right - 1, myRect.bottom - Y, PATCOPY); 
  1121.     PatBlt (hDC, 0, 0, myRect.right - 1, ArtTopSpace, PATCOPY); 
  1122.     if(ThisDoc->ScXOffset == 0)
  1123.     {
  1124.       PatBlt (hDC, 0, 0, ArtSideSpace, ThisDoc->ScYHeight, PATCOPY);
  1125.     }  
  1126.        
  1127.     UnlockLine (BlockPtr, LinePtr, &hBlock, &Offset, &MyLineID);
  1128.     EndPaint (hWnd, &ps);
  1129.     break;
  1130.       }
  1131.  
  1132.     case IDM_ARTICLE_RETRIEVE_COMPLETE:
  1133.        SetArticleMenus(hWnd, ENABLE);
  1134.        break;
  1135.  
  1136.     case WM_COMMAND:
  1137.       switch (LOWORD(wParam))
  1138.     {
  1139.     case IDM_EXIT: 
  1140.      ThisDoc->TextSelected = FALSE;
  1141.      CloseArtWnd(hWnd, ThisDoc);
  1142.       break;
  1143.  
  1144.     case IDM_SAVE:
  1145.       if (strcmp (SaveArtFileName, ""))
  1146.         {
  1147.           SaveArtAppend = TRUE;
  1148.           MRRWriteDocument (ActiveArticleDoc, sizeof (TypText), SaveArtFileName, SaveArtAppend);
  1149.           /* Should the 0 be sizeof(TypText) ? */
  1150.           break;
  1151.         }
  1152.       else
  1153.         {
  1154.           goto saveas;
  1155.         }
  1156.  
  1157.     case IDM_SAVEAS:
  1158.     saveas:;
  1159.  
  1160.       if (DialogBox (hInst, "WinVnSaveArt", hWnd, lpfnWinVnSaveArtDlg))
  1161.         {
  1162.           InvalidateRect (hWnd, NULL, TRUE);
  1163.         }
  1164.       break;
  1165.  
  1166.     case IDM_PRINT:
  1167.         PrintArticle(hWnd,ThisDoc);
  1168.  
  1169.       break;
  1170.             
  1171.         case IDM_PRINT_SETUP:
  1172.         PrinterSetup(hWnd,PD_PRINTSETUP);
  1173.  
  1174.       break; 
  1175.       
  1176.     case IDM_DECODE_ARTICLE: 
  1177.       if (TestDecodeBusy(hWnd, "Can't decode this article"))
  1178.          break;
  1179.       if (CommBusy && CommDoc == ThisDoc)
  1180.       {
  1181.          MessageBox (hWnd, "Please wait until article retrieval is complete before decoding", "Please Wait", MB_OK);
  1182.          break;
  1183.       }    
  1184.  
  1185.       if (!DialogBoxParam (hInst, "WinVnDecodeArts", hWnd, lpfnWinVnDecodeArtsDlg, 0))
  1186.          InvalidateRect (hWnd, NULL, TRUE);
  1187.       else
  1188.          DecodeDoc (hWnd, ActiveArticleDoc);
  1189.       break;
  1190.               
  1191.     case IDM_SELECT_ALL:
  1192.       EnableMenuItem(GetMenu(hWnd),IDM_COPY,MF_ENABLED) ;
  1193.       EnableMenuItem(GetMenu(hWnd),IDM_DESELECT_ALL,MF_ENABLED) ;
  1194.       ThisDoc->TextSelected = TRUE;
  1195.       ThisDoc->BeginSelect.LineNum = 0;
  1196.       ThisDoc->BeginSelect.CharNum = 0; 
  1197.       ThisDoc->EndSelect.LineNum = ThisDoc->TotalLines - 1;
  1198.       FindLineOrd(ThisDoc, (unsigned)ThisDoc->EndSelect.LineNum, &BlockPtr, &LinePtr);
  1199.       textlen = ((TypText far *) ((char far *) (LinePtr) +
  1200.                  sizeof (TypLine)))->NameLen;
  1201.       ThisDoc->EndSelect.CharNum = textlen - 1;
  1202.       GetClientRect(hWnd, &myRect);
  1203.       InvalidateRect(hWnd, &myRect, FALSE);         
  1204.       break;                                             
  1205.     
  1206.     case IDM_DESELECT_ALL:
  1207.       EnableMenuItem(GetMenu(hWnd),IDM_COPY,MF_GRAYED) ;
  1208.       EnableMenuItem(GetMenu(hWnd),IDM_DESELECT_ALL,MF_GRAYED) ;
  1209.       ThisDoc->TextSelected = FALSE;
  1210.       GetClientRect(hWnd, &myRect);
  1211.       InvalidateRect(hWnd, &myRect, FALSE);         
  1212.       break;                                             
  1213.     
  1214.     case IDM_COPY:
  1215.       CopyTextToClipBoard(ThisDoc);
  1216.       break;                                             
  1217.     
  1218.     case IDM_FIND_NEXT_SAME:
  1219.     case IDM_NEXT_ARTICLE:
  1220.     case IDM_PREV_ARTICLE:
  1221.          case IDM_FIND_NEXT_UNSEEN:
  1222.          
  1223.       if (ThisDoc->ParentDoc)
  1224.         {
  1225.           LockLine (ThisDoc->ParentDoc->hParentBlock,
  1226.             ThisDoc->ParentDoc->ParentOffset,
  1227.             ThisDoc->ParentDoc->ParentLineID,
  1228.             &BlockPtr, &LinePtr);
  1229.  
  1230.           GroupDoc = (TypGroup far *) ((char far *) LinePtr + sizeof (TypLine));
  1231.               
  1232.               if (GroupDoc)
  1233.                {
  1234.                if (LOWORD(wParam) == IDM_FIND_NEXT_UNSEEN) {
  1235.         header_handle = GroupDoc->header_handle;
  1236.         thread_handle = GroupDoc->thread_handle;
  1237.         headers = lock_headers (header_handle,thread_handle);
  1238.         artindex = ThisDoc->LastSeenLineID;
  1239.           header_num = -1; 
  1240.           
  1241.           while ((++artindex < GroupDoc->total_headers) && header_num < 0)
  1242.             {
  1243.                     header = header_elt (headers,artindex);
  1244.                     if (!header->Seen) header_num = artindex;
  1245.                   } 
  1246.  
  1247.         unlock_headers (header_handle, thread_handle); 
  1248.         if (header_num >= 0)
  1249.         {
  1250.           ViewArticle (ThisDoc->ParentDoc, header_num, REUSE, SHOW, NO_ID);
  1251.           AdjustTopScByDoc (ThisDoc->ParentDoc, (unsigned int)header_num);
  1252.         } else MessageBox (hWnd, "No more Unseen articles in this Group", "That's all!", MB_OK);
  1253.           } 
  1254.           else if (LOWORD(wParam) == IDM_FIND_NEXT_SAME) {
  1255.         header_handle = GroupDoc->header_handle;
  1256.         thread_handle = GroupDoc->thread_handle;
  1257.         headers = lock_headers (header_handle,thread_handle);
  1258.  
  1259.         header_num =
  1260.           find_article_by_subject (headers,
  1261.                        ThisDoc->LastSeenLineID,
  1262.                        GroupDoc->total_headers-1);
  1263.  
  1264.         unlock_headers (header_handle, thread_handle); 
  1265.         if (header_num >= 0) {
  1266.           ViewArticle (ThisDoc->ParentDoc, header_num, REUSE, SHOW, NO_ID);
  1267.           AdjustTopScByDoc (ThisDoc->ParentDoc, (unsigned int)header_num);
  1268.         } else MessageBox (hWnd, "No more articles", "That's all!", MB_OK);
  1269.            }
  1270.  
  1271.           else if ((LOWORD(wParam) == IDM_NEXT_ARTICLE)
  1272.             && (ThisDoc->LastSeenLineID < (GroupDoc->total_headers - 1) )) {
  1273.                ViewArticle (ThisDoc->ParentDoc, ThisDoc->LastSeenLineID + 1, REUSE, SHOW, NO_ID);
  1274.                AdjustTopScByDoc (ThisDoc->ParentDoc, (unsigned int)ThisDoc->LastSeenLineID + 1);
  1275.               } else if ((LOWORD(wParam) == IDM_PREV_ARTICLE)
  1276.                    && (ThisDoc->LastSeenLineID > 0 )) {
  1277.                ViewArticle (ThisDoc->ParentDoc, ThisDoc->LastSeenLineID - 1, REUSE, SHOW, NO_ID);
  1278.                AdjustTopScByDoc (ThisDoc->ParentDoc, (unsigned int)ThisDoc->LastSeenLineID - 1);
  1279.               } else MessageBox (hWnd, "No more articles", "That's all!", MB_OK);
  1280.           }
  1281.  
  1282.            else  MessageBox (hWnd, "Sorry--you must have the group window around\n"
  1283.                          "\for me to be able to find the next article",
  1284.                    "Can't find next article", MB_OK);
  1285.                    
  1286.        UnlockLine (BlockPtr, LinePtr, &hBlock, &Offset, &MyLineID);
  1287.        }
  1288.        
  1289.       else
  1290.         MessageBox (hWnd,
  1291.             "That Group's window is gone.  Reopen it.",
  1292.             "Error", MB_OK);
  1293.  
  1294.       break;
  1295.  
  1296.     case IDM_POST:
  1297.       CreatePostingWnd (hWnd, ThisDoc, DOCTYPE_POSTING);
  1298.       break;
  1299.  
  1300.     case IDM_MAIL:
  1301.       (MailCtrl.fnMlWinCreate)(hWnd, ThisDoc, DOCTYPE_MAIL);
  1302.       break;
  1303.  
  1304.     case IDM_FORWARD:
  1305.  
  1306.       (MailCtrl.fnMlForward)(hWnd, ThisDoc);
  1307.       break;
  1308.  
  1309.     case IDM_SEARCH:
  1310.  
  1311.       FindDoc = ThisDoc;                     
  1312.         if (!(FindDoc->SearchStr[0]) && LastArticleTextFind[0]) 
  1313.           strcpy(FindDoc->SearchStr, LastArticleTextFind);
  1314.  
  1315.       if (DialogBox (hInst, "WinVnFind", hWnd, lpfnWinVnFindDlg))
  1316.         {
  1317.           found = DoFind (TRUE);
  1318.           if (!found)
  1319.         {
  1320.           strcpy (mybuf, "\"");
  1321.           strcat (mybuf, FindDoc->SearchStr);
  1322.           strcat (mybuf, "\" not found.");
  1323.           MessageBox (hWnd, mybuf, "Not found", MB_OK);
  1324.         }
  1325.         else
  1326.           strcpy(LastArticleTextFind, FindDoc->SearchStr);
  1327.  
  1328.         }
  1329.  
  1330.       break;
  1331.  
  1332.     case IDM_SEARCH_NEXT:
  1333.  
  1334.       FindDoc = ThisDoc;
  1335.       continueFind = TRUE;
  1336.       if (!FindDoc->SearchStr[0]) {
  1337.          if (!(FindDoc->SearchStr[0]) && LastArticleTextFind[0]) 
  1338.               strcpy(FindDoc->SearchStr, LastArticleTextFind);
  1339.          continueFind = DialogBox (hInst, "WinVnFind", hWnd, lpfnWinVnFindDlg);
  1340.       }
  1341.  
  1342.       if (continueFind && FindDoc->SearchStr[0])
  1343.         {
  1344.           found = DoFind (!FindDoc->hFindBlock && !FindDoc->FindLineID);
  1345.           if (!found)
  1346.         {
  1347.           strcpy (mybuf, "\"");
  1348.           strcat (mybuf, FindDoc->SearchStr);
  1349.           strcat (mybuf, "\" not found.");
  1350.           MessageBox (hWnd, mybuf, "No more occurrences", MB_OK);
  1351.         }
  1352.         }
  1353.       break;
  1354.  
  1355.  
  1356.     case IDM_ROT13:
  1357.        SetArticleRot13Mode(hWnd,GetArticleRot13Mode( hWnd) != TRUE)  ;
  1358.        InvalidateRect (hWnd, NULL, TRUE);
  1359.       break;
  1360.  
  1361.  
  1362.     }
  1363.          
  1364.     break;    
  1365.  
  1366.     default:
  1367.       return (DefWindowProc (hWnd, message, wParam, lParam));
  1368.     }
  1369.   return (0);
  1370. }
  1371.  
  1372. /*------------ CloseArtWnd ------------------------------
  1373.  *
  1374.  *  Make sure this Wnd is not the active Comm window, then destroy it
  1375.  */
  1376. void CloseArtWnd(HWND hWnd, TypDoc *ThisDoc)
  1377. {
  1378.   if (CommBusy && ThisDoc == CommDoc)
  1379.     MessageBox (hWnd,
  1380.         "Please wait until article retrieval is complete",
  1381.         "Cannot close article window", MB_OK|MB_ICONSTOP);
  1382.   else 
  1383.     DestroyWindow (hWnd);
  1384. }
  1385.  
  1386. void 
  1387. SetArticleMailMenu(HWND hWnd)
  1388. {
  1389.     HMENU hMenu, hSubMenu;
  1390.  
  1391.     hMenu = GetMenu (hWnd);
  1392.     hSubMenu = GetSubMenu (hMenu, 4);    // respond menu
  1393.     EnableMenuItem (hSubMenu, IDM_MAIL, MailCtrl.enableMail);
  1394.     EnableMenuItem (hSubMenu, IDM_FORWARD, MailCtrl.enableForward);
  1395. }
  1396.  
  1397. // dis/enable menu items which depend on article being completely retrieved
  1398. void
  1399. SetArticleMenus (HWND hWnd, int enable)
  1400. {
  1401.     HMENU hMenu, hSubMenu;
  1402.     UINT mode;
  1403.     
  1404.     if (enable == ENABLE)    
  1405.         mode = MF_BYCOMMAND|MF_ENABLED;
  1406.     else
  1407.         mode = MF_BYCOMMAND|MF_DISABLED|MF_GRAYED;
  1408.     
  1409.     hMenu = GetMenu (hWnd);
  1410.     hSubMenu = GetSubMenu (hMenu, 0);    // file menu
  1411.     EnableMenuItem (hSubMenu, IDM_SAVE, mode);
  1412.     EnableMenuItem (hSubMenu, IDM_SAVEAS, mode);
  1413.     EnableMenuItem (hSubMenu, IDM_PRINT, mode);
  1414.     EnableMenuItem (hSubMenu, IDM_PRINT_SETUP, mode);
  1415.     EnableMenuItem (hSubMenu, IDM_DECODE_ARTICLE, mode);
  1416.     EnableMenuItem (hSubMenu, IDM_EXIT, mode);
  1417.  
  1418.     hSubMenu = GetSubMenu (hMenu, 1);    // edit menu
  1419.     EnableMenuItem (hSubMenu, IDM_SELECT_ALL, mode);
  1420.  
  1421.     hSubMenu = GetSubMenu (hMenu, 2);    // search menu
  1422.     EnableMenuItem (hSubMenu, IDM_SEARCH, mode);
  1423.     EnableMenuItem (hSubMenu, IDM_SEARCH_NEXT, mode);
  1424.  
  1425.     hSubMenu = GetSubMenu (hMenu, 3);    // view menu
  1426.     EnableMenuItem (hSubMenu, IDM_NEXT_ARTICLE, mode);
  1427.     EnableMenuItem (hSubMenu, IDM_FIND_NEXT_UNSEEN, mode);
  1428.     EnableMenuItem (hSubMenu, IDM_FIND_NEXT_SAME, mode);
  1429.     EnableMenuItem (hSubMenu, IDM_PREV_ARTICLE, mode);
  1430.  
  1431.     hSubMenu = GetSubMenu (hMenu, 4);    // respond menu
  1432.     EnableMenuItem (hSubMenu, IDM_POST, mode);
  1433.     
  1434.     SetArticleMailMenu(hWnd);
  1435. }
  1436.  
  1437. /*------GetArticleRot13Mode-------------------------------
  1438.  *
  1439.  *  Routine to get the this article window Rot mode.
  1440.  *  Note :
  1441.  *     interogation of windows menu state to determine
  1442.  *     ROT13 drawing mode
  1443.  *    
  1444.  *-----------------------------------------------------*/
  1445.        
  1446. BOOL
  1447. GetArticleRot13Mode(HANDLE hWnd)
  1448.  
  1449. { 
  1450.  return (GetMenuState(GetMenu(hWnd),IDM_ROT13,NULL) == MF_CHECKED ) ;
  1451. }
  1452.  
  1453. /*------SetArticleRot13Mode-------------------------------
  1454.  *
  1455.  *  Routine to set the this article window into (or out of
  1456.  *  Rot mode).
  1457.  *  Note :
  1458.  *     interogation of windows menu state to determine
  1459.  *     ROT13 drawing mode
  1460.  *     need to invalidate window to force repaint to display
  1461.  *     in new mode
  1462.  *-----------------------------------------------------*/
  1463.        
  1464. void
  1465. SetArticleRot13Mode(HANDLE hWnd,BOOL RotMode)
  1466. {
  1467.   UINT action ;
  1468.  
  1469.   if (RotMode==TRUE) action = MF_CHECKED ;
  1470.   else action = MF_UNCHECKED ;
  1471.  
  1472.   CheckMenuItem( GetMenu(hWnd),IDM_ROT13,action) ;
  1473.  
  1474. }
  1475.  
  1476. /*            strROT13
  1477.  *
  1478.  * change the input string by ROT'ing each character
  1479.  *
  1480.  *
  1481.  */
  1482. void
  1483. strROT13 (char *cstring)
  1484.  
  1485. {
  1486.   char *cptr=cstring ;
  1487.  
  1488.   while (*cptr )
  1489.   {
  1490.       (*cptr++) = chROT13(*cptr);
  1491.  
  1492.   }
  1493. }
  1494.  
  1495. /*            chROT13
  1496.  *
  1497.  * return a new character that is the ROT(ation of) 13 characters
  1498.  * of the input character
  1499.  *
  1500.  *
  1501.  */
  1502. char chROT13(char achar)
  1503. { char newchar ;
  1504.  
  1505.     if (isalpha(achar)) {
  1506.         if ((achar & 31) <= 13) {
  1507.             newchar = achar+13;
  1508.          } else {
  1509.             newchar = achar-13;
  1510.          }
  1511.     } else
  1512.         newchar = achar;
  1513.     
  1514.  return(newchar); 
  1515. }
  1516. /*            strnROT13
  1517.  *
  1518.  * change the input string by ROT'ating each character
  1519.  * for len or end of string (whichever is less)
  1520.  *
  1521.  *
  1522.  */
  1523. void strnROT13(char *cstring, int cstringlen)
  1524. {
  1525.   char *cptr = cstring ;
  1526.   int  clen = cstringlen ;
  1527.  
  1528.   while (*cptr  && clen)
  1529.   {
  1530.       (*cptr) = chROT13(*cptr);
  1531.       cptr++ ;
  1532.       clen-- ;
  1533.   }
  1534.  
  1535. } 
  1536.   
  1537.   
  1538.  
  1539.      
  1540. /* UpdateHighlightedText
  1541.  *
  1542.  * This function updates hightlighted text from the previous
  1543.  * position to the current position.
  1544.  *
  1545.  */
  1546.  
  1547. void UpdateHighlightedText(TypDoc far *DocPtr, TextSelect far *PreviousPos)
  1548. {
  1549.    SIZE extent;
  1550.    char far * textptr;
  1551.    int textlen;
  1552.    RECT Rect;
  1553.    int CurrentLineNum;
  1554.    BOOL ChangedSelectionDirection = FALSE;
  1555.    HBRUSH hSolidBrush;
  1556.    HDC hDC;
  1557.    TypBlock far *BlockPtr;
  1558.    TypLine far *LinePtr;
  1559.    TextSelect far *Start, *End, *Temp;
  1560.         
  1561.    hDC = GetDC(DocPtr->hDocWnd);               
  1562.  
  1563.    // check to see if selection is in a forward direction 
  1564.    // (i.e. top-to-bottom or left-to-right
  1565.    if((DocPtr->EndSelect.LineNum > DocPtr->BeginSelect.LineNum) ||
  1566.      ((DocPtr->EndSelect.LineNum == DocPtr->BeginSelect.LineNum) &&
  1567.       (DocPtr->EndSelect.CharNum >= DocPtr->BeginSelect.CharNum)))
  1568.    { 
  1569.      if((PreviousPos->LineNum == -1))
  1570.      {
  1571.        Start = &DocPtr->BeginSelect;                                              
  1572.        if(ChangedSelectionDirection) 
  1573.        {
  1574.          InvalidateRect(DocPtr->hDocWnd, NULL, FALSE);
  1575.        } 
  1576.         
  1577.      }
  1578.      else
  1579.      {  
  1580.        Start = PreviousPos;
  1581.      }  
  1582.      End = &DocPtr->EndSelect;                       
  1583.      
  1584.      // check to see if highlighting or unhighlighting
  1585.      if((End->LineNum > Start->LineNum) ||
  1586.        ((End->LineNum == Start->LineNum) &&
  1587.         (End->CharNum >= Start->CharNum)))
  1588.      {
  1589.        SetBkColor(hDC, ArticleTextColor);
  1590.        SetTextColor(hDC, ArticleBackgroundColor); 
  1591.      }
  1592.      else
  1593.      {
  1594.        SetBkColor(hDC, ArticleBackgroundColor);
  1595.        SetTextColor(hDC, ArticleTextColor); 
  1596.        Temp = Start;
  1597.        Start = End;
  1598.        End = Temp;
  1599.      }       
  1600.    }
  1601.    else
  1602.    {
  1603.  
  1604.      Start = &DocPtr->EndSelect;
  1605.      if((PreviousPos->LineNum == -1))
  1606.      {
  1607.        End = &DocPtr->BeginSelect;                                              
  1608.        if(ChangedSelectionDirection) 
  1609.        {
  1610.          InvalidateRect(DocPtr->hDocWnd, NULL, FALSE); 
  1611.        }  
  1612.      }                                                  
  1613.      else
  1614.      {  
  1615.        End = PreviousPos;  
  1616.      }
  1617.      
  1618.      // check to see if highlighting or unhighlighting
  1619.      if((End->LineNum > Start->LineNum) ||
  1620.        ((End->LineNum == Start->LineNum) &&
  1621.         (End->CharNum >= Start->CharNum)))
  1622.      {
  1623.        SetBkColor(hDC, ArticleTextColor);
  1624.        SetTextColor(hDC, ArticleBackgroundColor);
  1625.      }
  1626.      else       
  1627.      {
  1628.        SetBkColor(hDC, ArticleBackgroundColor);
  1629.        SetTextColor(hDC, ArticleTextColor); 
  1630.        Temp = Start;
  1631.        Start = End;
  1632.        End = Temp;
  1633.      }       
  1634.    }         
  1635.  
  1636.    FindLineOrd(DocPtr, (unsigned)Start->LineNum, &BlockPtr, &LinePtr);
  1637.    textlen = ((TypText far *) ((char far *) (LinePtr) +
  1638.                sizeof (TypLine)))->NameLen; 
  1639.    textptr = (char far *) ((char far *) (LinePtr) + sizeof (TypLine) + sizeof (TypText) );            
  1640.    if (isLineQuotation(textptr))
  1641.    {  /* prepare to print a quotation Line */
  1642.      SelectObject (hDC, hFontArtQuote);
  1643.    }
  1644.    else
  1645.    {  /* prepare to print a normal line */
  1646.      SelectObject (hDC, hFontArtNormal);
  1647.    }
  1648.     
  1649.    GetTextExtentPoint(hDC, (LPSTR)textptr, Start->CharNum, &extent);
  1650.    Rect.top = (int)ArtTopSpace + ((Start->LineNum - (int)DocPtr->TopLineOrd) * (int)ArtLineHeight);
  1651.    Rect.left = extent.cx - ((int)DocPtr->ScXOffset * (ArtCharWidth +1) - ArtSideSpace);
  1652.  
  1653.    if(Start->LineNum == End->LineNum)
  1654.    {
  1655.      GetTextExtentPoint(hDC, (LPSTR)textptr, End->CharNum +1, &extent);
  1656.      Rect.bottom = Rect.top + ArtLineHeight;
  1657.      Rect.right = extent.cx - ((int)DocPtr->ScXOffset * (ArtCharWidth +1) - ArtSideSpace);
  1658.    
  1659.      if(textlen != 0)
  1660.      {
  1661.        ExtTextOut(hDC, Rect.left, Rect.top, ETO_OPAQUE, &Rect, 
  1662.           textptr + Start->CharNum, End->CharNum - Start->CharNum +1, (LPINT)NULL);
  1663.      }
  1664.      else
  1665.      {
  1666.        Rect.right = Rect.left +4;
  1667.        hSolidBrush = CreateSolidBrush(GetBkColor(hDC));
  1668.        FillRect(hDC, &Rect, hSolidBrush);  /* Rectangle used to represent CR/LF */
  1669.        DeleteObject((HGDIOBJ)hSolidBrush);      
  1670.      }     
  1671.     
  1672.      ReleaseDC(DocPtr->hDocWnd, hDC);
  1673.    }
  1674.    else
  1675.    {
  1676.      GetTextExtentPoint(hDC, (LPSTR)textptr, textlen, &extent);
  1677.      Rect.bottom = Rect.top + ArtLineHeight;
  1678.      Rect.right = extent.cx - ((int)DocPtr->ScXOffset * (ArtCharWidth +1) - ArtSideSpace);
  1679.    
  1680.      if(textlen != 0)
  1681.      {
  1682.        ExtTextOut(hDC, Rect.left, Rect.top, ETO_OPAQUE, &Rect, 
  1683.           textptr + Start->CharNum, textlen - Start->CharNum, (LPINT)NULL);
  1684.      }
  1685.      else
  1686.      {
  1687.        Rect.right = Rect.left +4;
  1688.        hSolidBrush = CreateSolidBrush(GetBkColor(hDC));
  1689.        FillRect(hDC, &Rect, hSolidBrush);  /* Rectangle used to represent CR/LF */
  1690.        DeleteObject((HGDIOBJ)hSolidBrush);      
  1691.      }     
  1692.     
  1693.      
  1694.      CurrentLineNum = Start->LineNum + 1;
  1695.      
  1696.      while(CurrentLineNum < End->LineNum) 
  1697.      {             
  1698.        NextLine(&BlockPtr, &LinePtr);
  1699.        textlen = ((TypText far *) ((char far *) (LinePtr) +
  1700.                  sizeof (TypLine)))->NameLen; 
  1701.        textptr = (char far *) ((char far *) (LinePtr) + sizeof (TypLine) + sizeof (TypText) );            
  1702.        if (isLineQuotation(textptr))
  1703.        {  /* prepare to print a quotation Line */
  1704.          SelectObject (hDC, hFontArtQuote);
  1705.        }
  1706.        else
  1707.        {  /* prepare to print a normal line */
  1708.          SelectObject (hDC, hFontArtNormal);
  1709.        } 
  1710.        
  1711.        Rect.top = (int)ArtTopSpace + ((CurrentLineNum - (int)DocPtr->TopLineOrd) * (int)ArtLineHeight);
  1712.        Rect.left = ArtSideSpace - (int)DocPtr->ScXOffset * (ArtCharWidth +1);
  1713.        GetTextExtentPoint(hDC, (LPSTR)textptr, textlen, &extent);
  1714.        Rect.bottom = Rect.top + ArtLineHeight;
  1715.        Rect.right = extent.cx - ((int)DocPtr->ScXOffset * (ArtCharWidth +1) - ArtSideSpace);
  1716.        
  1717.        if(textlen != 0)
  1718.        {
  1719.          ExtTextOut(hDC, Rect.left, Rect.top, ETO_OPAQUE, &Rect, 
  1720.                     textptr, textlen, (LPINT)NULL);
  1721.        }
  1722.        else
  1723.        {
  1724.          Rect.right = Rect.left +4;
  1725.          hSolidBrush = CreateSolidBrush(GetBkColor(hDC));
  1726.          FillRect(hDC, &Rect, hSolidBrush);  /* Rectangle used to represent CR/LF */
  1727.          DeleteObject((HGDIOBJ)hSolidBrush);      
  1728.        }     
  1729.                   
  1730.        CurrentLineNum++;
  1731.        
  1732.      }             
  1733.      
  1734.      NextLine(&BlockPtr, &LinePtr);
  1735.      textlen = ((TypText far *) ((char far *) (LinePtr) +
  1736.                sizeof (TypLine)))->NameLen; 
  1737.      textptr = (char far *) ((char far *) (LinePtr) + sizeof (TypLine) + sizeof (TypText) );            
  1738.      if (isLineQuotation(textptr))
  1739.      {  /* prepare to print a quotation Line */
  1740.        SelectObject (hDC, hFontArtQuote);
  1741.      }
  1742.      else
  1743.      {  /* prepare to print a normal line */
  1744.        SelectObject (hDC, hFontArtNormal);
  1745.      } 
  1746.     
  1747.      Rect.top = (int)ArtTopSpace + ((CurrentLineNum - (int)DocPtr->TopLineOrd) * (int)ArtLineHeight);
  1748.      Rect.left = ArtSideSpace - (int)DocPtr->ScXOffset * (ArtCharWidth +1);
  1749.      GetTextExtentPoint(hDC, (LPSTR)textptr, End->CharNum + 1, &extent);
  1750.      Rect.bottom = Rect.top + ArtLineHeight;
  1751.      Rect.right = extent.cx - ((int)DocPtr->ScXOffset * (ArtCharWidth +1) - ArtSideSpace);
  1752.        
  1753.      if(textlen != 0)
  1754.      {
  1755.        ExtTextOut(hDC, Rect.left, Rect.top, ETO_OPAQUE, &Rect, 
  1756.                   textptr, End->CharNum + 1, (LPINT)NULL);
  1757.      }
  1758.      else
  1759.      {
  1760.        Rect.right = Rect.left +4;
  1761.        hSolidBrush = CreateSolidBrush(GetBkColor(hDC));
  1762.        FillRect(hDC, &Rect, hSolidBrush); /* Rectangle used to represent CR/LF */
  1763.        DeleteObject((HGDIOBJ)hSolidBrush);      
  1764.      }     
  1765.  
  1766.   }  
  1767.                                       
  1768.   ReleaseDC(DocPtr->hDocWnd, hDC);     
  1769.   
  1770. }   
  1771.    
  1772.  
  1773. void CopyTextToClipBoard(TypDoc FAR *DocPtr)   
  1774. {  
  1775.   TextSelect *Start, *End;
  1776.   TypBlock FAR *BlockPtr;
  1777.   TypLine FAR *LinePtr;
  1778.   int CurrentLineNum;
  1779.   int j;
  1780.   int textlen;
  1781.   char FAR *textptr;
  1782.  
  1783.   HGLOBAL hGlobalMemory;
  1784.   char FAR *GlobalMemoryPtr;           
  1785.   DWORD SelectedTextLength = 0;
  1786.       
  1787.   /* Check to see if selection is in a forward direction.           *
  1788.    * Start should always point to first selected position           *
  1789.    * when the document is seen from top-to-bottom and               *
  1790.    * left-to-right.                                                 */
  1791.   if((DocPtr->EndSelect.LineNum > DocPtr->BeginSelect.LineNum) ||
  1792.     ((DocPtr->EndSelect.LineNum == DocPtr->BeginSelect.LineNum) &&
  1793.      (DocPtr->EndSelect.CharNum >= DocPtr->BeginSelect.CharNum)))
  1794.   { 
  1795.     Start = &DocPtr->BeginSelect;                                              
  1796.     End = &DocPtr->EndSelect;                       
  1797.   }
  1798.   else
  1799.   {
  1800.     Start = &DocPtr->EndSelect;
  1801.     End = &DocPtr->BeginSelect;  
  1802.   }         
  1803.  
  1804.   /*Calculate the number of bytes to be moved to the clipboard.     */
  1805.   CurrentLineNum = Start->LineNum;
  1806.   FindLineOrd(DocPtr, (unsigned)CurrentLineNum, &BlockPtr, &LinePtr);
  1807.   textlen = ((TypText far *) ((char far *) (LinePtr) +
  1808.               sizeof (TypLine)))->NameLen;
  1809.       
  1810.   if(Start->LineNum == End->LineNum)                  
  1811.   {
  1812.     /* Text is selected on only one line.                           */
  1813.     SelectedTextLength = End->CharNum - Start->CharNum + 1;
  1814.   }
  1815.   else
  1816.   {
  1817.     /* Length of the first line. The 2 is for CR/LF.                */
  1818.     SelectedTextLength = textlen - Start->CharNum + 2;
  1819.                  
  1820.     NextLine(&BlockPtr, &LinePtr);
  1821.     CurrentLineNum++;
  1822.         
  1823.     /* Add in the lengths of all whole lines selected               */ 
  1824.     while(CurrentLineNum < End->LineNum)
  1825.     {
  1826.        textlen = ((TypText far *) ((char far *) (LinePtr) +
  1827.                   sizeof (TypLine)))->NameLen;
  1828.          
  1829.        SelectedTextLength += textlen + 2;
  1830.        /* The 2 is for CR/LF.                                       */
  1831.          
  1832.        NextLine(&BlockPtr, &LinePtr);
  1833.        CurrentLineNum++;
  1834.     }
  1835.         
  1836.     /* Add in the length of the last line selected.                 */ 
  1837.     textlen = ((TypText far *) ((char far *) (LinePtr) +
  1838.                sizeof (TypLine)))->NameLen;
  1839.     if(textlen != 0)
  1840.     {
  1841.        SelectedTextLength += End->CharNum + 1; 
  1842.     }
  1843.     else
  1844.     {
  1845.        SelectedTextLength += 2;
  1846.        /* The 2 is for CR/LF.                                       */
  1847.     }    
  1848.   }                            
  1849.        
  1850.   /* Allocate memory and move selected text to clipboard.           *
  1851.    * The 1 is for NULL string termination.                          */
  1852.   hGlobalMemory = GlobalAlloc(GHND, SelectedTextLength + 1);
  1853.   if(hGlobalMemory)
  1854.   {
  1855.     GlobalMemoryPtr = GlobalLock(hGlobalMemory);
  1856.     CurrentLineNum = Start->LineNum;
  1857.     FindLineOrd(DocPtr, (unsigned)CurrentLineNum, &BlockPtr, &LinePtr);
  1858.     textlen = ((TypText far *) ((char far *) (LinePtr) +
  1859.                sizeof (TypLine)))->NameLen;
  1860.     textptr = (char far *) ((char far *) (LinePtr) + sizeof (TypLine) + sizeof (TypText) );            
  1861.     /* Move textptr to the first character selected.                 */
  1862.     textptr += Start->CharNum;
  1863.       
  1864.     if(Start->LineNum == End->LineNum)                  
  1865.     { 
  1866.       /* Copy the text from the only line selected.                   */
  1867.       for(j = 0; j < End->CharNum - Start->CharNum + 1; j++)
  1868.       {
  1869.         *GlobalMemoryPtr++ = *textptr++;
  1870.       }  
  1871.     }
  1872.     else
  1873.     {                          
  1874.       /* Copy the first line and add CR/LF at the end of the line.    */  
  1875.       for(j = 0; j < textlen - Start->CharNum; j++)
  1876.       {
  1877.         *GlobalMemoryPtr++ = *textptr++;
  1878.       }  
  1879.       *GlobalMemoryPtr++ = '\r';
  1880.       *GlobalMemoryPtr++ = '\n';
  1881.       NextLine(&BlockPtr, &LinePtr);
  1882.       CurrentLineNum++;
  1883.       /* Copy all whole lines selected add add CR/LF at the end       *
  1884.       * of each line.                                                */
  1885.       while(CurrentLineNum < End->LineNum)
  1886.       {
  1887.          textlen = ((TypText far *) ((char far *) (LinePtr) +
  1888.                     sizeof (TypLine)))->NameLen;
  1889.          textptr = (char far *) ((char far *) (LinePtr) + 
  1890.                     sizeof (TypLine) + sizeof (TypText) );
  1891.          for(j = 0; j < textlen; j++)
  1892.          {
  1893.            *GlobalMemoryPtr++ = *textptr++;
  1894.          }  
  1895.          *GlobalMemoryPtr++ = '\r';
  1896.          *GlobalMemoryPtr++ = '\n';
  1897.         
  1898.          NextLine(&BlockPtr, &LinePtr);
  1899.          CurrentLineNum++;
  1900.       }
  1901.       /* Copy the last line selected                                  */
  1902.       textlen = ((TypText far *) ((char far *) (LinePtr) +
  1903.                  sizeof (TypLine)))->NameLen;
  1904.       textptr = (char far *) ((char far *) (LinePtr) + sizeof (TypLine) + sizeof (TypText) );
  1905.       if(textlen != 0)
  1906.       {
  1907.         for(j = 0; j < End->CharNum + 1; j++)
  1908.         {
  1909.           *GlobalMemoryPtr++ = *textptr++;
  1910.         }  
  1911.       }
  1912.       else
  1913.       {
  1914.         *GlobalMemoryPtr++ = '\r';
  1915.         *GlobalMemoryPtr++ = '\n';
  1916.       }                                 
  1917.     }                                        
  1918.       
  1919.     GlobalUnlock(hGlobalMemory); 
  1920.     OpenClipboard(DocPtr->hDocWnd); 
  1921.     EmptyClipboard();
  1922.       
  1923.     SetClipboardData(CF_TEXT, hGlobalMemory);
  1924.     CloseClipboard();
  1925.   }
  1926.   else
  1927.   {
  1928.     MessageBox(DocPtr->hDocWnd, "Not enough memory to copy selected text.", "Out Of Memory", MB_OK);
  1929.   }
  1930.  
  1931. }     
  1932.    
  1933.                              @
  1934.  
  1935.  
  1936. 1.32
  1937. log
  1938. @support for cascading windows
  1939. @
  1940. text
  1941. @d3 1
  1942. a3 1
  1943.  * $Id: wvart.c 1.31 1994/09/16 00:53:16 jcooper Exp $
  1944. d5 6
  1945. d351 4
  1946. a354 2
  1947.        CopyTextToClipBoard(ThisDoc);
  1948.        SendMessage (hWnd, (UINT) WM_COMMAND, (WPARAM) IDM_DESELECT_ALL, (LPARAM) 0L);  //Un-mark selection
  1949. @
  1950.  
  1951.  
  1952. 1.31
  1953. log
  1954. @massive cleanup for 92.6
  1955. @
  1956. text
  1957. @d3 1
  1958. a3 1
  1959.  * $Id: wvart.c 1.30 1994/08/24 17:59:26 jcooper Exp $
  1960. d5 3
  1961. d225 1
  1962. d252 2
  1963. a253 1
  1964.     case WM_DESTROY:                
  1965. d992 1
  1966. a992 1
  1967.       if (!DialogBox (hInst, "WinVnDecodeArts", hWnd, lpfnWinVnDecodeArtsDlg))
  1968. @
  1969.  
  1970.  
  1971. 1.30
  1972. log
  1973. @misc encoding/decoding changes
  1974. @
  1975. text
  1976. @d3 1
  1977. a3 1
  1978.  * $Id: wvart.c 1.29 1994/08/11 00:18:04 jcooper Exp $
  1979. d5 3
  1980. d110 5
  1981. a115 3
  1982. #include "windows.h"
  1983. #include "WVglob.h"
  1984. #include "WinVn.h"
  1985. d195 1
  1986. a234 5
  1987. /*  case WM_INITMENUPOPUP:        // JSC - now handled in SetArticleMenus 
  1988.       EnableMenuItem(GetMenu(hWnd),IDM_MAIL,MailCtrl.enableMail) ;
  1989.       EnableMenuItem(GetMenu(hWnd),IDM_FORWARD,MailCtrl.enableForward);
  1990.       break;
  1991. */
  1992. d251 2
  1993. d339 6
  1994. d1113 3
  1995. a1115 1
  1996.       FindDoc = ThisDoc;
  1997. d1127 3
  1998. d1137 8
  1999. a1144 1
  2000.       if (strcmp (FindDoc->SearchStr, ""))
  2001. d1146 1
  2002. a1146 1
  2003.           found = DoFind (FALSE);
  2004. d1184 1
  2005. a1184 3
  2006.   else {
  2007.     ThisDoc->LongestLine = 0;
  2008.     ThisDoc->ScXOffset = 0;
  2009. a1185 1
  2010.   }
  2011. d1188 11
  2012. d1235 2
  2013. a1236 2
  2014.     EnableMenuItem (hSubMenu, IDM_MAIL, mode);
  2015.     EnableMenuItem (hSubMenu, IDM_FORWARD, mode);
  2016. @
  2017.  
  2018.  
  2019. 1.29
  2020. log
  2021. @added support for article retreive complete message
  2022. @
  2023. text
  2024. @d3 1
  2025. a3 1
  2026.  * $Id: wvart.c 1.28 1994/08/03 00:54:10 gardnerd Exp $
  2027. d5 3
  2028. d1042 1
  2029. d1044 3
  2030. a1046 3
  2031.         else MessageBox (hWnd, "No more Unseen articles in this Group", "That's all!", MB_OK);
  2032.             } 
  2033.           
  2034. d1058 1
  2035. a1058 1
  2036.         if (header_num >= 0)
  2037. d1060 2
  2038. a1061 1
  2039.         else MessageBox (hWnd, "No more articles", "That's all!", MB_OK);
  2040. d1065 8
  2041. a1072 7
  2042.             && (ThisDoc->LastSeenLineID <
  2043.                 (GroupDoc->total_headers - 1) ))
  2044.               ViewArticle (ThisDoc->ParentDoc, ThisDoc->LastSeenLineID + 1, REUSE, SHOW, NO_ID);
  2045.               else if ((LOWORD(wParam) == IDM_PREV_ARTICLE)
  2046.                    && (ThisDoc->LastSeenLineID > 0 ))
  2047.               ViewArticle (ThisDoc->ParentDoc, ThisDoc->LastSeenLineID - 1, REUSE, SHOW, NO_ID);
  2048.               else MessageBox (hWnd, "No more articles", "That's all!", MB_OK);
  2049. d1074 1
  2050. a1074 1
  2051.           
  2052. @
  2053.  
  2054.  
  2055.  
  2056. 1.28
  2057. log
  2058. @Fixed bug with cut to clipboard at 1st and last line of text
  2059. @
  2060. text
  2061. @d3 1
  2062. a3 1
  2063.  * $Id: wvart.c 1.27 1994/07/27 21:14:38 gardnerd Exp $
  2064. d5 3
  2065. d114 1
  2066. d212 4
  2067. d226 1
  2068. a226 1
  2069.     case WM_INITMENUPOPUP:
  2070. d230 1
  2071. a230 1
  2072.  
  2073. d310 3
  2074. a312 2
  2075.              {
  2076.               SendMessage (hWnd,(UINT) WM_COMMAND, (WPARAM) IDM_FIND_NEXT_UNSEEN, (LPARAM) 0L); 
  2077. d922 4
  2078. a928 1
  2079.  
  2080. d1162 40
  2081. @
  2082.  
  2083.  
  2084.  
  2085. 1.27
  2086. log
  2087. @copy to clipboard
  2088. @
  2089. text
  2090. @d3 1
  2091. a3 1
  2092.  * $Id: wvart.c 1.26 1994/07/12 19:16:13 rushing Exp $
  2093. d5 3
  2094. d324 9
  2095. a332 6
  2096.     case WM_LBUTTONDOWN:            
  2097.       if (CommBusy && CommDoc == ThisDoc)
  2098.       {
  2099.          MessageBox (hWnd, "Please wait until article retrieval is complete before selecting text.", "Please Wait", MB_OK);
  2100.       }
  2101.       else    
  2102. d340 25
  2103. a364 2
  2104.         ThisDoc->BeginSelect.LineNum = (Y - ArtTopSpace) / ArtLineHeight + ThisDoc->TopLineOrd;
  2105.         ThisDoc->BeginSelect.CharNum = cursor_to_char_number (X,Y,ThisDoc,&BlockPtr,&LinePtr);
  2106. d370 3
  2107. a372 2
  2108.       }  
  2109.       break;  
  2110. d407 4
  2111. d445 4
  2112. d511 5
  2113. d558 4
  2114. @
  2115.  
  2116.  
  2117.  
  2118. 1.26
  2119. log
  2120. @missing curlies in CloseArtWnd()
  2121. @
  2122. text
  2123. @d3 1
  2124. a3 1
  2125.  * $Id: wvart.c 1.25 1994/07/01 03:45:53 dumoulin Exp rushing $
  2126. d5 3
  2127. d105 4
  2128. a108 1
  2129.  
  2130. d186 1
  2131. a186 2
  2132.  
  2133.  
  2134. d229 1
  2135. d233 2
  2136. a234 1
  2137.     case WM_DESTROY:
  2138. d319 203
  2139. a521 1
  2140.       break;
  2141. d523 65
  2142. d647 3
  2143. d658 20
  2144. a677 1
  2145.  
  2146. d730 100
  2147. a829 3
  2148.  
  2149.           /* Now write out the line. */
  2150.           SetRect (&aRect, 0, Y, myRect.right, Y+ArtLineHeight);
  2151. d831 14
  2152. a845 5
  2153.           ExtTextOut (hDC, X, Y, ETO_OPAQUE, &aRect, textptr,
  2154.                       MyLen, (LPINT)NULL);
  2155.           
  2156.           Y += ArtLineHeight;
  2157.           lineNum++ ;
  2158. d847 2
  2159. a848 1
  2160.       while (--VertLines > 0 && NextLine (&BlockPtr, &LinePtr));
  2161. d852 1
  2162. a852 1
  2163.     /* left, just blank it out.                              */
  2164. d855 6
  2165. a860 1
  2166.  
  2167. d870 2
  2168. a871 1
  2169.     case IDM_EXIT:
  2170. d921 28
  2171. a948 1
  2172.  
  2173. d1203 399
  2174. a1601 1
  2175. }
  2176. @
  2177.  
  2178.  
  2179.  
  2180. 1.25
  2181. log
  2182. @Added the Find Next Unseen and concept of SPACE as a "power key"
  2183. @
  2184. text
  2185. @d3 1
  2186. a3 1
  2187.  * $Id: wvart.c 1.24 1994/06/30 21:30:22 gardnerd Exp dumoulin $
  2188. d5 3
  2189. d660 7
  2190. a666 6
  2191.       "Please wait until article retrieval is complete",
  2192.       "Cannot close article window", MB_OK|MB_ICONSTOP);
  2193.   else
  2194.      ThisDoc->LongestLine = 0;
  2195.      ThisDoc->ScXOffset = 0;
  2196.      DestroyWindow (hWnd);
  2197. @
  2198.  
  2199.  
  2200.  
  2201. 1.24
  2202. log
  2203. @Allow scrolling by pixels instead of characters
  2204. @
  2205. text
  2206. @d3 1
  2207. a3 1
  2208.  * $Id: wvart.c 1.23 1994/06/23 23:07:13 dumoulin Exp $
  2209. d5 3
  2210. d149 1
  2211. a149 2
  2212. long FAR PASCAL 
  2213. WinVnArtWndProc (hWnd, message, wParam, lParam)
  2214. d171 1
  2215. a171 1
  2216.   TypLineID MyLineID;
  2217. d175 1
  2218. d280 14
  2219. d513 2
  2220. a514 1
  2221.  
  2222. d523 15
  2223. d539 7
  2224. a545 1
  2225.           if (LOWORD(wParam) == IDM_FIND_NEXT_SAME) {
  2226. d559 1
  2227. a559 1
  2228.           }
  2229. d561 1
  2230. a561 3
  2231.           else {
  2232.         if (GroupDoc)
  2233.           { if ((LOWORD(wParam) == IDM_NEXT_ARTICLE)
  2234. a568 6
  2235.             }
  2236.         else MessageBox (hWnd,
  2237.                  "Sorry--you must have the group window around\n"
  2238.                  "\for me to be able to find the next article",
  2239.                  "Can't find next article", MB_OK);
  2240.         UnlockLine (BlockPtr, LinePtr, &hBlock, &Offset, &MyLineID);
  2241. d570 8
  2242. a577 1
  2243.         }
  2244. @
  2245.  
  2246.  
  2247.  
  2248. 1.23
  2249. log
  2250. @added menu item for Printer Setup
  2251. @
  2252. text
  2253. @d3 1
  2254. a3 1
  2255.  * $Id: wvart.c 1.22 1994/06/01 19:01:51 gardnerd Exp dumoulin $
  2256. d5 3
  2257. d353 1
  2258. a353 1
  2259.  
  2260. d375 2
  2261. a376 2
  2262.  
  2263.     RangeHigh = ThisDoc->LongestLine - ThisDoc->ScXChars; 
  2264. d383 2
  2265. a384 1
  2266.     SetScrollPos (hWnd, SB_HORZ, ThisDoc->ScXOffset, TRUE); 
  2267. d388 1
  2268. a388 1
  2269.     X = ArtSideSpace;
  2270. d418 3
  2271. a420 11
  2272.           /* Check Horz Scroll to see if a blank line is to be written */
  2273.           if((int)MyLen - (int)ThisDoc->ScXOffset < 0)
  2274.           {
  2275.             ExtTextOut (hDC, X, Y, ETO_OPAQUE, &aRect, " ",
  2276.                         1, (LPINT)NULL);
  2277.           }
  2278.           else
  2279.           {
  2280.             ExtTextOut (hDC, X, Y, ETO_OPAQUE, &aRect, textptr+ThisDoc->ScXOffset,
  2281.                       MyLen-ThisDoc->ScXOffset, (LPINT)NULL);
  2282.           } 
  2283. d422 1
  2284. a422 1
  2285.           Y += ArtLineHeight;
  2286. d426 1
  2287. a426 1
  2288.  
  2289. a429 1
  2290.  
  2291. d431 1
  2292. a431 1
  2293.     PatBlt (hDC, 0, Y, myRect.right - 1, myRect.bottom - Y, PATCOPY);
  2294. @
  2295.  
  2296.  
  2297.  
  2298. 1.22
  2299. log
  2300. @horizontal scrolling support
  2301. @
  2302. text
  2303. @d3 1
  2304. a3 1
  2305.  * $Id: wvart.c 1.21 1994/06/01 18:50:49 rushing Exp $
  2306. d5 3
  2307. d477 3
  2308. d481 2
  2309. @
  2310.  
  2311.  
  2312.  
  2313. 1.21
  2314. log
  2315. @more f3 bugs
  2316. @
  2317. text
  2318. @d3 1
  2319. a3 1
  2320.  * $Id: wvart.c 1.20 1994/05/27 01:29:29 rushing Exp rushing $
  2321. d5 3
  2322. d328 4
  2323. d366 1
  2324. a366 1
  2325.       RangeHigh = 0;
  2326. d370 9
  2327. d410 13
  2328. a422 2
  2329.           ExtTextOut (hDC, X, Y, ETO_OPAQUE, &aRect, textptr, MyLen, (LPINT)NULL);
  2330.  
  2331. d619 2
  2332. @
  2333.  
  2334.  
  2335.  
  2336. 1.20
  2337. log
  2338. @unnecessary winundoc.h
  2339. @
  2340. text
  2341. @d3 1
  2342. a3 1
  2343.  * $Id: wvart.c 1.19 1994/05/23 18:36:00 jcooper Exp rushing $
  2344. d5 3
  2345. d116 1
  2346. @
  2347.  
  2348.  
  2349.  
  2350. 1.19
  2351. log
  2352. @new attach code, session [dis]connect
  2353. @
  2354. text
  2355. @d3 1
  2356. a3 1
  2357.  * $Id: wvart.c 1.18 1994/02/24 21:26:54 jcoop Exp $
  2358. d5 3
  2359. a78 1
  2360. #include "winundoc.h"
  2361. @
  2362.  
  2363.  
  2364.  
  2365. 1.18
  2366. log
  2367. @jcoop changes
  2368. @
  2369. text
  2370. @d3 1
  2371. a3 1
  2372.  * $Id: wvart.c 1.17 1994/01/24 17:41:01 jcoop Exp $
  2373. d5 3
  2374. d81 1
  2375. d203 1
  2376. a203 6
  2377.       if (CommBusy && ThisDoc == CommDoc)
  2378.      MessageBox (hWnd,
  2379.       "Please wait until article retrieval is complete",
  2380.       "Cannot close article window", MB_OK|MB_ICONSTOP);
  2381.       else
  2382.         DestroyWindow (hWnd);
  2383. d412 1
  2384. a412 1
  2385.       DestroyWindow (hWnd);
  2386. d573 14
  2387. @
  2388.  
  2389.  
  2390.  
  2391. 1.17
  2392. log
  2393. @90.2 changes
  2394. @
  2395. text
  2396. @d3 1
  2397. a3 1
  2398.  * $Id: wvart.c 1.16 1994/01/16 12:23:43 jcoop Exp $
  2399. d5 3
  2400. d194 2
  2401. a195 2
  2402.       ThisDoc->ScYLines = (myRect.bottom - myRect.top - TopSpace) / ArtLineHeight;
  2403.       ThisDoc->ScXChars = (myRect.right - myRect.left - SideSpace) / ArtCharWidth;
  2404. d324 1
  2405. a324 2
  2406.     SIZE sz;
  2407.     unsigned int Offset, MyLen, width;
  2408. a327 1
  2409.     int RestX;
  2410. d334 1
  2411. d338 2
  2412. a339 1
  2413.     SelectObject (hDC, hArticleBackgroundBrush);
  2414. d360 2
  2415. a361 2
  2416.     X = SideSpace;
  2417.     Y = StartPen;
  2418. d388 2
  2419. a389 10
  2420.  
  2421.       (GetTextExtentPoint (hDC, textptr, MyLen, &sz));       
  2422.            width = sz.cx;                                     
  2423.           SetTextColor (hDC, ArticleTextColor);
  2424.  
  2425.           TextOut (hDC, X, Y, textptr, MyLen);
  2426.  
  2427.           RestX = X + width;
  2428.           
  2429.           PatBlt (hDC, RestX, Y, myRect.right - RestX, ArtLineHeight, PATCOPY);
  2430. d400 1
  2431. a400 1
  2432.  
  2433. @
  2434.  
  2435.  
  2436.  
  2437. 1.16
  2438. log
  2439. @New font/color painting.  no longer use view_art_by_id
  2440. @
  2441. text
  2442. @d3 1
  2443. a3 1
  2444.  * $Id: wvart.c 1.16 1994/01/16 11:59:44 jcoop Exp $
  2445. d5 3
  2446. d195 9
  2447. a203 1
  2448.  
  2449. @
  2450.  
  2451.  
  2452.  
  2453. 1.15
  2454. log
  2455. @new version box and cr lf consistency
  2456. @
  2457. text
  2458. @a0 1
  2459.  
  2460. d3 1
  2461. a3 1
  2462.  * $Id: wvart.c 1.14 1993/08/25 18:54:36 mbretherton Exp rushing $
  2463. d5 3
  2464. a71 1
  2465. void view_article_by_message_id (TypDoc *Doc, char far *article_request, long artindex);
  2466. d296 1
  2467. a296 1
  2468.         view_article_by_message_id (ThisDoc->ParentDoc, str, ThisDoc->LastSeenLineID);
  2469. d324 2
  2470. a325 1
  2471.  
  2472. d377 1
  2473. d382 1
  2474. d395 1
  2475. a395 1
  2476.     PatBlt (hDC, 0, Y, myRect.right, myRect.bottom - Y, PATCOPY);
  2477. d437 15
  2478. d477 1
  2479. a477 1
  2480.           ViewArticle (ThisDoc->ParentDoc, header_num, REUSE, SHOW);
  2481. d486 1
  2482. a486 1
  2483.               ViewArticle (ThisDoc->ParentDoc, ThisDoc->LastSeenLineID + 1, TRUE, SHOW);
  2484. d489 1
  2485. a489 1
  2486.               ViewArticle (ThisDoc->ParentDoc, ThisDoc->LastSeenLineID - 1, TRUE, SHOW);
  2487. @
  2488.  
  2489.  
  2490.  
  2491. 1.14
  2492. log
  2493. @MRB merge, mail & post logging
  2494. @
  2495. text
  2496. @d1 1
  2497. d4 1
  2498. a4 1
  2499.  * $Id: wvart.c 1.13 1993/08/05 20:06:07 jcoop Exp $
  2500. d6 3
  2501. @
  2502.  
  2503.  
  2504.  
  2505. 1.13
  2506. log
  2507. @save multiple articles changes by jcoop@@oakb2s01.apl.com (John S Cooper)
  2508. @
  2509. text
  2510. @d3 1
  2511. a3 1
  2512.  * $Id: wvart.c 1.12 1993/07/06 21:09:50 cnolan Exp $
  2513. d5 7
  2514. d101 1
  2515. a101 1
  2516.       return (artindex);    /* return the index */
  2517. d104 1
  2518. a104 1
  2519.   return (-1);            /* not found */
  2520. d210 1
  2521. a210 1
  2522.     thread_handle = GroupDoc->thread_handle;    
  2523. d311 1
  2524. a311 1
  2525.         int lineNum ;
  2526. d318 1
  2527. a318 1
  2528.         hDC = BeginPaint (hWnd, &ps);
  2529. d349 1
  2530. a349 1
  2531.               textptr = (char far *) LinePtr + sizeof (TypLine) + sizeof (TypText);
  2532. d354 2
  2533. a355 2
  2534.              strcpy (mybuf, textptr);
  2535.              textptr = mybuf ;
  2536. d365 1
  2537. a365 1
  2538.               }
  2539. d367 1
  2540. a367 1
  2541.               /* Now write out the line. */
  2542. d369 1
  2543. a369 1
  2544.           (GetTextExtentPoint (hDC, textptr, MyLen, &sz));       
  2545. d406 1
  2546. a406 1
  2547.           MRRWriteDocument (ActiveArticleDoc, sizeof (TypText), SaveArtFileName, SaveArtvRef, SaveArtAppend);
  2548. d431 1
  2549. a458 1
  2550.  
  2551. d460 9
  2552. a468 6
  2553.           {
  2554.             if (ThisDoc->LastSeenLineID <
  2555.             (GroupDoc->total_headers - 1) )
  2556.               ViewArticle (ThisDoc->ParentDoc, ThisDoc->LastSeenLineID + 1, REUSE, SHOW);
  2557.             else MessageBox (hWnd, "No more articles", "That's all!", MB_OK);
  2558.           }
  2559. d483 1
  2560. a483 1
  2561.     case IDM_FOLLOWUP:
  2562. d537 2
  2563. a538 2
  2564.       }
  2565.              
  2566. d615 2
  2567. a616 2
  2568.         if (isalpha(achar)) {
  2569.                 if ((achar & 31) <= 13) {
  2570. d620 2
  2571. a621 2
  2572.                  }
  2573.         } else
  2574. d623 1
  2575. a623 1
  2576.         
  2577. @
  2578.  
  2579.  
  2580.  
  2581. 1.12
  2582. log
  2583. @win32 support
  2584. @
  2585. text
  2586. @d3 1
  2587. a3 1
  2588.  * $Id: wvart.c 1.11 1993/06/26 00:53:33 rushing Exp $
  2589. d5 3
  2590. d446 1
  2591. a446 1
  2592.           ViewArticle (ThisDoc->ParentDoc, header_num, TRUE);
  2593. d456 1
  2594. a456 1
  2595.               ViewArticle (ThisDoc->ParentDoc, ThisDoc->LastSeenLineID + 1, TRUE);
  2596. @
  2597.  
  2598.  
  2599.  
  2600. 1.11
  2601. log
  2602. @warnings
  2603. @
  2604. text
  2605. @d3 1
  2606. a3 1
  2607.  * $Id: wvart.c 1.10 1993/06/26 00:18:46 rushing Exp rushing $
  2608. d5 3
  2609. d295 1
  2610. d359 2
  2611. a360 1
  2612.           width = LOWORD (GetTextExtent (hDC, textptr, MyLen));
  2613. d385 1
  2614. a385 1
  2615.       switch (wParam)
  2616. d431 1
  2617. a431 1
  2618.           if (wParam == IDM_FIND_NEXT_SAME) {
  2619. @
  2620.  
  2621.  
  2622.  
  2623. 1.10
  2624. log
  2625. @warnings
  2626. @
  2627. text
  2628. @d3 1
  2629. a3 1
  2630.  * $Id: wvart.c 1.9 1993/06/22 16:45:00 bretherton Exp rushing $
  2631. d5 3
  2632. d337 1
  2633. a337 1
  2634.           if  (ROT13Mode && (lineNum > ThisDoc->HeaderLines))
  2635. @
  2636.  
  2637.  
  2638.  
  2639. 1.9
  2640. log
  2641. @*** empty log message ***
  2642. @
  2643. text
  2644. @d3 1
  2645. a3 1
  2646.  * $Id: wvart.c 1.8 1993/06/11 00:11:26 rushing Exp $
  2647. d5 3
  2648. d555 1
  2649. a555 2
  2650.  
  2651. { HMENU hMenu ;
  2652. @
  2653.  
  2654.  
  2655.  
  2656. 1.8
  2657. log
  2658. @second merge from Matt Bretherton sources
  2659. @
  2660. text
  2661. @d3 1
  2662. a3 1
  2663.  * $Id: wvart.c 1.7 1993/05/29 03:32:30 rushing Exp rushing $
  2664. d5 5
  2665. d157 1
  2666. a157 1
  2667.       EnableMenuItem(GetMenu(hWnd),IDM_FORWARD,MailCtrl.enableMail);
  2668. @
  2669.  
  2670.  
  2671.  
  2672. 1.7
  2673. log
  2674. @threading support
  2675. @
  2676. text
  2677. @d3 1
  2678. a3 1
  2679.  * $Id: wvart.c 1.6 1993/05/28 18:23:40 rushing Exp rushing $
  2680. d5 3
  2681. d150 1
  2682. a150 1
  2683.     case WM_CREATE:
  2684. @
  2685.  
  2686.  
  2687.  
  2688. 1.6
  2689. log
  2690. @fixed far/huge problem in find_art_by_subject
  2691. @
  2692. text
  2693. @d3 1
  2694. a3 1
  2695.  * $Id: wvart.c 1.5 1993/05/24 23:28:24 rushing Exp rushing $
  2696. d5 3
  2697. d59 1
  2698. a59 1
  2699. long find_article_by_subject (TypHeader huge *headers,
  2700. d64 3
  2701. a66 1
  2702.   char far *thissub = headers[artindex++].subject;
  2703. d71 1
  2704. a71 1
  2705.     nextsub = headers[artindex].subject ;
  2706. d114 2
  2707. a115 1
  2708.   TypHeader huge * headers;
  2709. d183 2
  2710. a184 1
  2711.     headers = (TypHeader huge *) (GlobalLock (header_handle) + sizeof(char huge *)) ;
  2712. d186 1
  2713. a186 1
  2714.     headers[ThisDoc->LastSeenLineID].ArtDoc = (TypDoc *) NULL;
  2715. d188 1
  2716. a188 1
  2717.     GlobalUnlock (header_handle);
  2718. d403 45
  2719. a447 34
  2720.         if (ThisDoc->ParentDoc)
  2721.         {
  2722.             LockLine (ThisDoc->ParentDoc->hParentBlock,
  2723.                   ThisDoc->ParentDoc->ParentOffset,
  2724.                   ThisDoc->ParentDoc->ParentLineID,
  2725.                   &BlockPtr, &LinePtr);
  2726.  
  2727.             GroupDoc = (TypGroup far *) ((char far *) LinePtr + sizeof (TypLine));
  2728.  
  2729.             if (wParam == IDM_FIND_NEXT_SAME) {
  2730.                 header_handle = GroupDoc->header_handle;
  2731.                 headers = (TypHeader far *) (GlobalLock (header_handle) + sizeof(char huge *)) ;
  2732.  
  2733.                 header_num = find_article_by_subject (headers,ThisDoc->LastSeenLineID,GroupDoc->total_headers - 1);
  2734.  
  2735.                 GlobalUnlock (header_handle);
  2736.                 if (header_num >= 0)
  2737.                 ViewArticle (ThisDoc->ParentDoc, header_num, TRUE);
  2738.                 else MessageBox (hWnd, "No more articles", "That's all!", MB_OK);
  2739.             }
  2740.  
  2741.             else {
  2742.  
  2743.                 if (GroupDoc)
  2744.                 {
  2745.                   if (ThisDoc->LastSeenLineID < (GroupDoc->total_headers - 1) )
  2746.                     ViewArticle (ThisDoc->ParentDoc, ThisDoc->LastSeenLineID + 1, TRUE);
  2747.                   else MessageBox (hWnd, "No more articles", "That's all!", MB_OK);
  2748.                 }
  2749.                 else MessageBox (hWnd, "Sorry--you must have the group window around\n\for me to be able to find the next article", "Can't find next article", MB_OK);
  2750.             UnlockLine (BlockPtr, LinePtr, &hBlock, &Offset, &MyLineID);
  2751.             }
  2752.         }
  2753.         else MessageBox (hWnd, "That Group's window is gone.  Reopen it.", "Error", MB_OK);
  2754. @
  2755.  
  2756.  
  2757.  
  2758. 1.5
  2759. log
  2760. @header formatting (MRB)
  2761. @
  2762. text
  2763. @d3 1
  2764. a3 1
  2765.  * $Id: wvart.c 1.4 1993/05/18 22:11:40 rushing Exp $
  2766. d5 2
  2767. d8 1
  2768. d56 3
  2769. a58 3
  2770. long find_article_by_subject (TypHeader far *headers,
  2771.                 long artindex,
  2772.                 long num_headers)
  2773. d72 1
  2774. a72 1
  2775.   return (-1);                    /* not found */
  2776. @
  2777.  
  2778.  
  2779.  
  2780. 1.4
  2781. log
  2782. @smtp support
  2783. @
  2784. text
  2785. @d3 1
  2786. a3 1
  2787.  * $Id: wvart.c 1.3 1993/05/06 19:43:41 rushing Exp rushing $
  2788. d5 4
  2789. d26 1
  2790. a31 1
  2791. long find_article_by_subject (TypHeader far *headers,long artindex,long num_headers);
  2792. d35 1
  2793. a35 1
  2794. /************** find_article_by_subject *************
  2795. d41 1
  2796. a41 1
  2797.  *  format with wvheadr : GetArticleSubject
  2798. d51 2
  2799. a52 2
  2800. ********************************************************/
  2801.  
  2802. d54 2
  2803. a55 2
  2804.                 long artindex,
  2805.                 long num_headers)
  2806. d60 2
  2807. a61 2
  2808.  
  2809.  
  2810. d68 2
  2811. a69 2
  2812.  
  2813.   return (-1);            /* not found */
  2814. d88 1
  2815. a88 1
  2816.   PAINTSTRUCT ps;        /* paint structure          */
  2817. d90 2
  2818. a91 2
  2819.   HDC hDC;            /* handle to display context */
  2820.   RECT myRect;            /* selection rectangle      */
  2821. d140 1
  2822. d166 4
  2823. a169 4
  2824.            LockLine (ThisDoc->ParentDoc->hParentBlock,
  2825.                      ThisDoc->ParentDoc->ParentOffset,
  2826.                      ThisDoc->ParentDoc->ParentLineID,
  2827.                      &BlockPtr, &LinePtr);
  2828. d231 2
  2829. a232 2
  2830.         textlen = ((TypText far *) ((char far *) LinePtr +
  2831.                                 sizeof (TypLine)))->NameLen;
  2832. d234 2
  2833. a235 2
  2834.         textptr = (char far *) ((char far *) LinePtr +
  2835.                                sizeof (TypLine) + sizeof (TypText) );
  2836. d237 20
  2837. a256 20
  2838.         if (textlen)
  2839.         {                    /* find a message-id */
  2840.           char far *start, far *end;
  2841.  
  2842.           for (start = textptr + charnum; start >= textptr; start--) 
  2843.             if (*start == '<') break;
  2844.  
  2845.           for (end = textptr + charnum; end < (textptr + textlen); end++) 
  2846.             if (*end == '>') break;
  2847.  
  2848.           if ((start >= textptr) && (end < (textptr + textlen))) {
  2849.             sprintf (str, "ARTICLE %.*Fs\r", (int) ((long) end - (long) start + 1), start);
  2850.             LockLine (ThisDoc->ParentDoc->hParentBlock,
  2851.                            ThisDoc->ParentDoc->ParentOffset,
  2852.                    ThisDoc->ParentDoc->ParentLineID,
  2853.                    &BlockPtr, &LinePtr);
  2854.             GroupDoc = (TypGroup far *) ((char far *) LinePtr + sizeof (TypLine));
  2855.             view_article_by_message_id (ThisDoc->ParentDoc, str, ThisDoc->LastSeenLineID);
  2856.           }
  2857.         }
  2858. d273 1
  2859. d278 1
  2860. d280 1
  2861. a280 1
  2862.     hDC = BeginPaint (hWnd, &ps);
  2863. a282 1
  2864.     SelectObject (hDC, hFontArt);
  2865. d291 1
  2866. a291 1
  2867.     CurPos = ThisDoc->TopLineOrd;
  2868. d311 1
  2869. a311 1
  2870.           textptr = (char far *) LinePtr + sizeof (TypLine) + sizeof (TypText);
  2871. d313 15
  2872. a327 1
  2873.           /* Now write out the line.                            */
  2874. d329 2
  2875. d339 1
  2876. d386 1
  2877. a386 1
  2878.             PrintArticle(hWnd,ThisDoc);
  2879. d396 3
  2880. a398 3
  2881.                       ThisDoc->ParentDoc->ParentOffset,
  2882.                       ThisDoc->ParentDoc->ParentLineID,
  2883.                       &BlockPtr, &LinePtr);
  2884. d411 1
  2885. a411 1
  2886.                 else MessageBox (hWnd, "No more articles", "That's all!", MB_OK); 
  2887. d428 1
  2888. a428 1
  2889.           break;
  2890. d440 1
  2891. a440 1
  2892.       (MailCtrl.fnMlForward)(hWnd, ThisDoc, DOCTYPE_MAIL);
  2893. d477 6
  2894. a482 1
  2895.     }
  2896. d484 3
  2897. a486 1
  2898.     break;
  2899. d494 39
  2900. d534 8
  2901. d543 2
  2902. d546 3
  2903. d550 2
  2904. d553 9
  2905. d563 22
  2906. d586 6
  2907. d593 1
  2908. @
  2909.  
  2910.  
  2911.  
  2912. 1.3
  2913. log
  2914. @added Re: fix from MB
  2915. @
  2916. text
  2917. @d3 1
  2918. a3 1
  2919.  * $Id: wvart.c 1.2 1993/03/30 20:08:25 rushing Exp rushing $
  2920. d5 3
  2921. d413 5
  2922. @
  2923.  
  2924.  
  2925.  
  2926. 1.2
  2927. log
  2928. @MAPI
  2929. @
  2930. text
  2931. @d3 5
  2932. a7 2
  2933.  * $Id: wvart.c%v 1.1 1993/02/16 20:53:50 rushing Exp $
  2934.  * $Log: wvart.c%v $
  2935. d28 21
  2936. a48 4
  2937. long
  2938. find_article_by_subject (TypHeader far *headers,
  2939.                 long artindex,
  2940.                 long num_headers)
  2941. d50 13
  2942. a62 8
  2943. char far *subject = headers[artindex++].subject;
  2944.  
  2945.     do {
  2946.         if (lstrcmpi (headers[artindex].subject, subject) == 0)
  2947.         return (artindex);        /* return the index */
  2948.     } while (artindex++ < num_headers);
  2949.  
  2950.     return (-1);            /* not found */
  2951. d64 1
  2952. @
  2953.  
  2954.  
  2955.  
  2956. 1.1
  2957. log
  2958. @Initial revision
  2959. @
  2960. text
  2961. @d3 4
  2962. a6 2
  2963.  * $Id$
  2964.  * $Log$
  2965. d8 1
  2966. d105 4
  2967. d379 1
  2968. a379 1
  2969.       CreatePostingWnd (ThisDoc, DOCTYPE_POSTING);
  2970. d383 1
  2971. a383 1
  2972.       CreatePostingWnd (ThisDoc, DOCTYPE_MAIL);
  2973. @
  2974.  
  2975.